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A. DISCLAIMER 


Many terms used in this thesis are registered trademarks 


of commercial products. Rather than attempt to cite each 


individual occurrence of a trademark, all rezistered trade- 


marks appearing in this thesis are listed below following 


the firm holding the trademark: 


Digital 


Research Incorporated, Pacific Grove, California 
CP/M-88 Operating System 

CP/M-86 Operating System 

PL/I-82 Programming Languase 

PL/I-86 Programming Language 

LINK-8@ Linking Utility 


XLT-86 Code Conversion Utility 


Intel Corporation, Santa Clara, California 


Digital 


INTELLEC MDS Microcomputer Development System 
Multibus Bus Architecture 

38082/8086 Microprocessors 

3982 Assembly Language Programming Language 
ISIS-II Operating System 

I APX-432 Development System 

Equipment Corporation, Maynard, Massachusetts 


VAX 11/730 Minicomputer 


19 





VAX/VMS Operating System 

Interlan Corporation, Chelmsford, Massachusetts 
NISØ1Ø Ethernet Controller Board 

xerox Corporation, Stamford, Connecticut 


Ethernet Local Area Network 


B. BACKGROUND 

The connection of heterogeneous computer systems via 
Some form of network, to perform various data processing 
tasks where data or resource sharing is important, is an 
extremely active topic for both hardware and software 
designers. 

The International Standards Organization Open System 
Interconrection (ISO OSI) architectural reference model 
provides the general framework in which computer network 
systems are designed to operate. This seven-layered, 
hierarchical description of functions was developed to 
provide a vehicle for the later development of a set of 
specific network protocols. The hierarchical nature of this 
model compares favorably with the techniques of hier- 
archical, structured design of software that are being 
taught and implemented today. The logical conclusion of the 
above comparison is to use the functionally layered frame- 
work provided by the ISO OSI model as a guide for deciding 
how to modularize the communication software necessary to 


allow host computers to be connected via a network. 
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ES PURPOSE 

The main purpose of this thesis is to construct a soft- 
ware interface to the CP/M-80 operating system so that files 
and messages can be transported between various host systems 
via a Local Area Network. The structuring of this software, 
to reflect the layers of the ISO model, allows modifications 
to the network software to be more easily made. 

This thesis presents a set of PL/I-£9 and intel 8280 
Assembly Language modules that, when linked together, allow 
INTELLEC “DS users to communicate via an Ethernet Local Area 
Network. The complete set of software developed also 
includes two programs that can be used to troubleshoot or 
test the Ethernet hardware. The communication program 
allows INTELLEC MDS computers connected to the network to: 

1. Send messages or files to other hosts. 

2. Receive messages or files from other hosts. 
3. Become a terminal of the VAX 11/720. 

4, Command file transfers to or from the VAX. 

Additionally, the communication software will provide 
faster data transfers between host machines than the direct 
host-to-ncst serial communications methods currently used. 

mas thesis is divided into four chapters. Chapter Ii 
discusses computer networks in general. The Ethernet is 
presented as a specific example of a Local Area Network. 

The Interlan hardware is also discussed as an implementation 


of the 3thernet. Chapter III deals with the details of the 





Ethernet communications software. The topological, hard- 
ware, software and performance issues are presented in 
detail. Chapter IV presents the conclusions drawn from the 
network realization and discusses possible areas of future 


growth and performance enhancement. 
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II. COMPUTER NETWORKS 


me a me da s w በመው መው ከመው Db ome da” amn wp u 


A. DEFINITION 

Computer networks are defined to be collections of 
interconnected, autonomous computers. A computer network 
can also be a grouping in which the required processing 
functions are dispersed among several of the attached 
mets. (Ref. 1: p. 2] 

Computer networks are classified by their length. 
Networks whose attached hosts are farther than a few kilo- 
meters apart are considered Long Haul, while shorter networks 
are considered Local Area. Networks are also classified by 
the nature of the hosts connected to them. Homogeneous 
networks consist of lixe hosts, while heterogeneous networxs 


consist of dissimilar hosts. 


Be PURPOSE 

The main reason that the subject of computer networking 
has rapidly achieved prominence is that networkinz provides 
a workable solution to data processing problems where the 
sharing of data or other resources js important. Networking 
can also enhance the fault tolerance of an activity's 
computational assets. Loss of any host, connected to most 
Local Area networks, would not affect either the other hosts 


or the network itself. [Ref. 1: pp. 3-4] 
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Current trends seem to polnt to the merging of personal 
computers with Local Networking to form what one author calls 
“community microcomputing (Ref. 2: p. 60]. This refers to 
the interconnection, via a Local Area Network, of a set of 
microcomputers that may, as a networked group, enhance the 
price/performance ratio for the using activity when 
compared to installing a single, large nainframe computer 


mem, 1: p. 5]. 


n THEORY 
The most generally accepted model of computer network 
architecture is the International Standards Organization 
Open Systems Interconnection Model (ISO OSI) model. This 
model is a set o? hierarchical functions and protocols that 
are necessary to allow computers to communicate via a net- 
worx. The seven layers and their definitions are listed 
below: [Ref. 1: pp. 15-21] 
1. Physical Layer - This layer vrovides the actual 
connection between hosts. It provides the bit 
Stream transmission across the network medium. 
2. Data Link Layer - This layer performs error detection 
and correction, address recognition and flow control. 
This layer also provides data framins if necessary. 
3. Network Layer - The network layer provides logical 
channels between two endpoints in a network. This 
layer forms the data into packets for transmission. 
4, Transport Layer - The transport layer provides the 
network with single, group, or broadcast addressing 


modes and sets up virtual circuits between hosts. 


E session Layer - This layer contains the functions 
necessary to perform address conversion. This layer 


15 





initiates, binds, and terminates the dialogue between 
nosts. 


6. Presentation Layer - The presentation layer is mainly 
concerned with converting and transforming the data 
passed to a user. This layer also contains the file 
transfer and virtual protocols. 

7. Application Layer - The application layer, the highest 
in the model, is where the user interface to all the 
network services resides. The lower layers exist only 
to support this layer. 

Many computer networks with layered protocols exist, but 
their layers may not match the ISO model exactly because 
some of the ISO functions may not be necessary. “ne 
development of the model came about due to the need to 
Standardize network description. The main factors that 
motivated the designers were: [Ref. 1: p. 15] 

1. To create a layer where abstraction was necessary. 


2. To give each layer a well defined function. 


3. To keep the information passed between layers to a 
minimum. 


4. To create only a minimum number of layers to decrease 
complexity. 


The above design principles are the same as the software 
engineering principles of abstraction and modularity. The 
hierarchical structure also compares favorably with the 
Structured programming techniques of software design that 
are currently being advocated. (Ref. 4: pp. 58-60] 

The ISO OSI model is shown in Figure 2.1. The main 
concepts of the model are: (Ref. 2: pp. 28-29] 

ከሪ 2፡01 layer only interacts with the vertically 


adjacent layers through well defired interfaces. 
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Changes to any layer can thus be accomplished without 
changing the other layers. 


EE Iwo basic protocols exist per layer. The first is the 
vertical protocol between layers. The second is the 
horizontal or peer protocol between transmitting and 
becelvine layers of different hosts that allows 
virtual communication to occur between those hosts. 
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Figure 2.1 ISO Reference Model 


The flow of data in the network model bezins at the top 
layer of the sending host. As the data is passed down the 
sending host’s layers additional information, either bits or 


bytes, is added to the original data urtil the lowest layer 
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]s reached. At the lowest layer, the data and added 
information is sent on the network medium. The receiving 
host then performs the reverse process on the received 
information by passing it up the ISO layers until all 

ገሽ ከ remains, af ier again reaching the top layer, is the 


original data. 


D. LOCAL AREA NETWORKS 
Computer networks, as previously mentioned, are 
classified as either Long Haul or Local Area. Local Area 
networks are characterized by: [Ref. 1: v. 286] 
1. ል length of no greater than a few kilometers. 


EA data rate in excess of one million bits per second 
(1 Mbps). 


eee Ownership by a single organization. 

Two techniques of transmission medium access are being 
considered for standardization by the Institute of 
Electrical ard Electronic Fngineers (IZZE). The proposed 
IEEE Standard £22 endorses both the toxen passing and 
carrier sense methods of Local Area Network medium access. 
Token passing consists of not allowing any host on the local 
network to transmit on the medium unless it has possession 
of a token that is passed in a predetermined order from one 
Moet tO another. The carrier sense method allows each host 
equal access to the network. This scheme allows each nost 
detect the occurrence of any other transmissions on the 


network and allows the host to wait until the medium is 
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Gear before transmitting. If two hosts try to transmit 
ExmudPtaneously, they will each detect the collision and wait 
an independent, random interval before attempting another 
transmission. Ethernet is an example of a carrier sense 


፣ ከ ከህ ር. (Ref. 5: р. 31] 


BESERTEERNET 
Specific details of Ethernet Standard - Version 1.9 are: 
wer. 6: p. 1] 
1. A data rate of 10 Megabits per second (19Mbps). 
ООО А maximum host separation of 2.5 kilometers. 


de A transmission medium consisting of a shielded coaxial 
cable. 


4. A topology consisting of an unrooted tree. 


RR Link control via fully distributed peer protocol with 
SeeatasGical contention resolution. 


6. A message protocol of variable size frames. 

Additionally, it must be noted that the *thernet 
Standard does not provide for either error correction, data 
ey ption, or priority access to the network medium. Ат 
any point in time, only one transmission can occupy the 
pesdum. [a3ef. 6: p. 5] 

One current implementation of an Ethernet network is the 
-BJS system developed oy E-Systems Incorporated. The 3-3US 
implementation differs from the Ethernet Standard in that 
it provides for transmitted frames to be acknowledged. The 


E-BUS also provides multiple coaxial cables to increase both 





L rective bandwidth and the overall fault tolerance of 


the network. (Ref. 10: pp. 77-72] 
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III. NETWORK IMPLEMENTATION 


O <a gg «=» G q Lodi. s Q qm]? a Í s a q “መመ 


I ОРОТОСТҮ 
The Ethernet Local Area Network implemented at the 
Computer Science Department of the Naval Postaraduate School 
consists of three connected systems: 
1. The VAX 11/780 (VMS operating system) ninicomputer. 
2. An INTELLEC MDS system (CP/M-80 operating system), 
with attached double density disk drives, that 
functions as the input/output processor for the Intel 


ШАРХ 452 52 bit microcomputer system. 


3. A second INTELLEC MDS system with attached single 
density disk drives. (Also CP/M-82) 


This thesis presents the software necessary to allow the 
above CP/M-82 based systems to communicate via the network. 
The software necessary to allow the VAX 11/780 the same 
communication capabilities was written by Lt. Thawip 


Netniyom [Ref. 9]. 


3. HARDWARE 

All the hariware needed to implement the above network 
was provided by the Interlan Corporation. The hardware 
needed to connect each INTZLLEC system to the network was 
ከከ 21151 25 20110ህ52 [፪6ያ, 7: pp. 7-13] 

1. The base port address switches and the priority and 
interrupt jumpers were set on the NI3Ø1Ø Sthernet 
controller board as shown in Figure 5.1. 

ШОО Ehe NIS010 was then inserted into the INTELLZC system 


in ar odd-numbered slot in the Multibdus. 
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5. The NT1@ transceiver was installed across the Ethernet 
coaxial cable and the cabling that connects the NT12 
to the NISØLØ was connected as shown in Figure 3.2. 


The above mentioned hardware provides the ISO layer one 


and two functions. The Physical Layer functions provided by 
the transceivers and connecting cables are: [Ref. 7: p. 2] 


Support of a 12 Mbps data rate. 


2. Bit stream generation through Manchester encodine. 


3. Media access control. 


` 
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Figure 3.1 NIS0127 Switch and Jumper Locations 


The Data Link Layer functions provided by the NIS012 
board are: [Bef. 7: p. 2] 


1. Data encapstlation/diecapsulation (framing). 


D Address recognition. 


3. Transmit and receive data link management. 
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The NIS212 operates both as a slave to the host computer 
ና as à master processor when controlling the direct memory 
access (DMA) operations between the NI3019 buffers and the 
host conputer’s memory. The transmit function is command 
Ven by the host, while the receive function is interrupt 
amen. Control of the NI3@19 by the host is accomplished 
by programming the host to load commands, addresses, byte 
counts and interrupt enable values into registers onboard 


the NI3019. [Ref. 7: 95. 69-75] 


ISO REFERENCE MODEL 
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Figure 3.2 Ethernet Architecture and NISZIZ Implementation 


A complete list of NIS3ØLØ conmands is located in 


Appendix A. A table of the NISØLØ registers can be found ir 
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Empendix 5. After issuance of any command, the host must 
check for a value in the Command Status Register. The 
EMECULIon of the command only occurs after this read 
operation has been accomplished. The details of the read 
operation are as follows: [Ref. 7: pp. 70-72] 

ከ tne host issues a command. 


TS host checks the Interrupt Status Register to 
check if tne least significant bit iS a one. If the 
least significant bit is a one, then the host reads 
the value in the command Status Register. 

3. If the value in the Command Status Register is a zero 
then the command executed successfully. After the 
host has issued a Load, Transmit, and Send command, 

a value of one 15 also considered a success. Any 
Other value represents a failure. 4 listing of 
Command Status Register values is located in Apvendix 
p 
The Command Status Register must also be read at tne 
beginning of any program written to control the NI3212. 
This register must be read at this time because the NISC12 
automatically performs it’s built-in diaaznostic routines 
each time the board is powered up or reset. The automatic 
testing places a value in the Command Status negister that 
must be read to clear the register before any other commands 
can be given to the NI3Ø1Ø. 
The NI3019 transmit function is accomplished in the 
following manner: [Ref. 7: p. 85] 


mee tne host loads a block of memory in the format shown 
in Appendix D for each frame to be transmitted. 


2. The host loads the three NIJ212 address registers with 
the first address of tne host memory block. 
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below: 


J. 


E 


The host then loads the two NI3Ø1Ø byte count 
registers with the number of bytes in the data block. 


The host then enables a Transmit DMA Done (TDD) 
interrupt by writing a value of 6 Mex into the 
Interrupt Enable Register. 


The NI3210 interrupts the host once the memory block 
has been transferred into the NI3919 transmit buffer. 


The host then enables a Receive Block Available (RBA) 
interrupt by loading the Interrupt Enable Register 
with a value of 4 Eex. This step allows any pending 
received frames to be handled. 


The host then commands the NI30109 to send the frame 

by writing a value of 29 Hex into the Command Register 
and subsequently reading the Command Status Pegister 
as previously discussed. 


The NI3019 receive function is accomplished as shown 


[Ref. 7: p.90] 
The host enables an RBA interrupt as shown above. 


The NI3012, upon receivinz å frame, iuterruvts the 
ከን ከኒሁ መ ጠጠቢ1”ሃ it of frane receipt. 


The host then writes a value of 2 Hex into the 
Interrupt Enable Register to disable any other 
NI3019 interrupts. 


The host writes values into the three NI3g10 address 
registers to inform the NIS2190 where, in host memory, 
to transfer the data. 


The host then loads the two NIS212 byte count 
registers. 


The host then enables the DMA transfer of the data by 
writing a value of "7 Hex into the Interrupt Enable 
Register. 


The NI3@1@ then interrupts the host upon completion 
of the transfer. The format of received data in the 


ግማ 


host memory is shown in Appendix E. 


The above steps are repeated for each received frame. 


The host is then responsible for whatever further operations 
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must be done with the data. For example, the data could be 
played on the console or written to a disk file. 

The NIS010 also has built-in test features and can also 
support the concepts of broadcast and multicast trans- 
mission. Broadcast transmission allows a host to transmit 
to all other hosts simultaneously, while multicast allows 


transmission to only a few selected hosts. 


C. SOFTWARE 

The software necessary to implement ISO layers tnree 
through seven was originally written entirely in age 
Assembly Language. The final version of the communication 
program consists of PL/I-80 modules that perform the 
functions of ISO layers six and seven and an Intei 808? 
Assembly Language module that performs the functions of ISO 
layers two and three. The ISO layer two functions performed 
by the software supplement the functions of this layer 


performed by tre NI3010. The primary goals of the software 


1. To allow users to run, if necessary, test progrems 
at ll verify the functioning of the hardware. 


2. To allow the INTYLLSC systems to communicate via the 
Enternet to any other hosts connected to the network. 


1. Test Programs 
The basic software design process began by first 
determining the maior functional divisions or modules into 


Maa. program should be divided. A primary consideration, 





Since implementation using the NI3912 is interrupt 
dependent, wes a simple interrupt handling routine. This 

ን пе was the basis of the first working test program, 
ETHTESTA. The interrupt handling module is the basis around 
which all the succeeding prozrams were written. ETETISTA, 
an 8080 Assembly Language program, commands the NI3ØLØ to 
enorm built-in tests, one of which sends test data to 

the NI3?10 Transmit buffer and back through the NIS3212 
Receive Data Register. This process is called the NI3Ø1Ø 
Module Interface Loopback mode. Use of this test mode does 
not permit the interrupt handling to be done in the same 
manner as a normal communication program, nor does this node 
allow data to be sent onto the network. The source code 
ሸክ) Пр of ETHTESTA.ASM is located in Appendix F. 

A process of gradual enhancement was then applied to 
upgrade ETHTESTA into a prozram that utilized the complete 
interrupt capability as that of a functional communication 
program. The follow-on test program, ETETESTB, performs all 
MI tests of STHTESTA and, additionally, sends a small block 
of data to itself via the network using the Ni301€ Internal 
Meepback mode. A source code listing of ZTATESTB.ASM can be 
end in Appendix G. 

2. Communication Between Network Hosts 
Utilization of only one INTSLLEC system with installed 


*thernet hariware. The next logical step was to again 
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upgrade the software to allow the INTELLEC systems to 
communicate via the network. 

In order to sive hosts, especially of different 
architectures and operating systems, the ability to 
communicate via a network involves the development of 
higher level protocols to handle any differences that may 
arise due to tke above factors. Specifically, differences 
between hosts related to file storaze and frame transmission 
Speed are the kind of issues that must be handled by the use 
of protocols. in an Ethernet network, the nature of each 
frame sent onto the network must also be encoded so that 
the receiving host can determine what further operations 
must be performed on the received frame data. 

The primary operatine system file storage mismatch 
in this network implementation occurred between the VAX/VMS 
and the C?/M-8@ operating systems. The VAX stores text 
files as variable length records by text sentence. The 
VAX, also, does not explicitly store the carriage return and 
line feed characters in the record. On the other hand, the 
CP/M-8@ operating system stores all the characters, 
including the carriage return and line feed, in one long 
continuous file. This file storage incompatability was 
resolved vy adding format conversion routines to both the 
and INTELLEC software to convert the data prior to 


transmission on the network. 





A transmission versus reception speed mismatch was 
discovered ir the early testing between the VAX and the 
INTELLEC systems. The VAX can send data much faster than 
tne INTELLYC systems can receive it. The solution to this 
problem was to add a "stop-ard-wait" [Zef. 1: pp. 143-145] 
protocol to the ISC layer two functions already verformed 
ty the NIS5012. This protocol was implemented in software 
and assures the sending host that the last frame sent was 
eee ly received. This protocol also prevents a faster 
sender from inundating a slower receiver. 

The frame encoding protocol adopted for our network 
Mas shown in Table 3.1. These codes are written into the 


two Type Field bytes in the transmit data block as shown in 


Table 3.1 Type Field Protocol 
Type Field | Interpretation at 2eceiver 
Byte 1 | Byte 2 | 
f oos pe 208 Message frame 
ee ar Last frame of terminal reply 
20 Fr 4cknowledge frame 
Or 2Ø File transfer-first frame 
CP 21 File transfer-middle frame 
CF FF File transfer-last frame 


ENpendix D. The receiving hosts interpret these two bytes, 


once the data block is in their memory as shown in Advendix 


[1 


оз 


(D 


termine what operations must De done to the data. 
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The other protocol adopted was to use fixed data 
block sizes per Ethernet frame. The choices available to 
me user are: 

Ze Bytes. (Must be used for all file transfers) 


26 Pytes. 


N N 


512 Bytes. 


(Es 


1224 Bytes. 
5. 1520 Bytes. (Used in VAX terminal service mode) 

A set of proerams, written exciusively in 8232 
Assembly Language, was first developed to send short, single 
Sentence messages from one INTELLEC system to another usine 
the above protocols. Next, the file transfer modules were 
developed and tested. Throughout the entire process, close 
attention was paid to maintaining software modularity that 
was analozous to the functional nodularity of the ISO model. 
Software modules *hat compared directly to ISO layers were 
maintained as separate modules and, whenever possitle, 
rewritten in PL/I-89, a high level language. The final 
communication program consists of three PL/I-898 modules and 
one 8929 Assembly Language module. These modules were 
med together, using LINK-@@, into the final product. The 
final program, ETE*RNET.COM, contains calling sequences that 
meepeect ly reflect the ISO OSI model structure as shown in 
Maple 3.2. The source code for all modules can be found in 
mependices Z through X. Modules were not written for ISC 


layers four and five because these layers are primarily 
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concerned with Long Haul network functions that are unneeded 
by our network. Modules 2°CEIVE,SENDFPAM,RECFRAM,TEMSG and 
AWATT are contained in the assembly language module because 
the functions they are reauired to perform are more 
efficiently programmed in that language. The actual calling 
sequence for the transmit process occurs as follows: 


1. ETHERNET: Asks for user to select type of network 
service desired and calls SENDATA, 

2. SENDATA: Encodes the transmit type field for the user 
Selected service and calls interral routines to control 
the transmission. This module calls SENDFRAM as each 
frame is ready for sending. 


5. SENDFRAM: This module sends each frame onto the network 
then calls AWAIT to wait for the acknowledze frame to 
arrive from the destination host. 


Table 3.2 Comparison of Program Modules and the ISO Model 


NSO | Transmit Receive 

LAYER | File i Message |VAX Modes | File | Message 
SORERNIT.PLI — — Same RECEIVE(STEER2. ASM) | 

6 SENDATA.PLI Same BECDATA.>PLI 

5 Not Implemented Same Not Implemerted 

Ll Not Implemented Same Not Implemented 

3 S ENDFRAM(ETHEZ2) Same RECFRAM(ZTHER2) 

— AWAIT(ETHER2)/Fdwe Same TRMSG(ETEER2Z)/Edwe 

1 AMO Hardware Same Same Same 


The callin> sequence for the receive process is ir 


the order shown oelow: 
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1.  ZTHERNET: The user selects the receive mode of network 
service and this module calls RECEIVE. 


RECEIVE: This module waits in a loop for the module 
RECTRAM to receive a frame from the network. Once 
the receive data is placed in host memory by RECFEAM, 
a flag is set and RECEIVE calls RECDATA. 


3. RECDAT4: This module decodes the type field of the 


received frame and calls internal modules that 
handle each different tyre of received data and, as 


part of this process, calls TRMSG which send the 
acknowledge frame back to the source. 
toe four major functions that the final program 
performs are: 


1. Transmissior of files or messages to any other networx 
hosts. 


2. Reception of files or messages from any other hosts. 


3. The ability to become a terminal of the VAX 11/722 
via the Ethernet. 


e 


The ability to send specially coded messages to the 
VAX to command it to either upload or download files. 
fee OPERATION 

Mier operation of test 2rograms, BTATESTA and STHTEST3, 
consists primarily of invoking either program using normal 
CP/M-29 procedures and following the directions presented by 
ШОШ ГО гат. Detailed instructions for use of the test 
programs can be found in Avpendix L. 

WWéefation of the communication program, =THERNET, also 
involves invoking the program using normal CP/M-&@ 
Procedures and following the menus presented by the program. 
Peteiled operating instructions for the use of the final 


wanun ication program ars located in Appendix М. 





E. PERFORMANCE 

Eres communication program provides faster data transfer 
between network hosts than currently employed methods. 
Table 3.3 demonstrates the improved performance realized 


in transferring data between single and double density 


INTELLEC systems. 


TABLE 5.5 Performance Comparison for Data Transfers 
Between Single and Double Density INTELLEC Systems 


¡Software Used ¡ File Size | Time | Data Rate(bps) | 

!(CP/M-80) WxXKEytes) | (Min:Sec)! Medium | Effective! 
SDXFER 1 O 22.25 S6 22 797 
ETHERNET EEG 3:30 12M 5188 


(0605: 9205 demo q G GJE» «AMD G a GE» GJE q w ms ee Oe ee በ6. 965 G መ 96 ጠመ 9 A mto . = E —- “Poe -r vm, SE am Mk SD SD mg መ ያፍ > => > Gs ao = ጨኤጨፕ wm EE 


The data rate of the medium is the rate at which data is 
actually sent on whatever medium is being utilized. The 
Eyemective data rate is the number of bits of useful data ” 
that was sent divided by the total elapsed time o? the data 
transfer. Data transfers between INTELLEC systems were not 
the only ones that showed a siznificant improvement over 
methods that were previously utilized. “Transfers of data to 
and from the VAX 11/789 were also accomplished significantly 
faster as shown in Table 3.4. 

The below presented data shows the improved performance 
0f data transfers when the Ethernet network is employed. 


Lastly, a series of experiments was performed to investizate 
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the performance limits of data transmission and reception 


of the CP/M-3Ø based programs. The conditions of the 


Table 5.4 Performance Comparison of Transfers Between 
VAX 11/782 and INTELLEC Systems 


‘Software Utilized jFile Size | Time | Data Ratelbos)! 
ERU to INTELLEC) {(4Bytes) j(Min:Sec) ¡Medium |Effective! 
IAPX 432 Pxe 136 6:48 9622 2720 
ETHERNET 136 2:05 12M 5724 

(To disk file) 

ETHERNET 136 1:35 19M 11452 


(To memory buffer) 
ESrPiIments were: 
me The stop-and-wait protocol was not employed. 


2. The frames would te sent as fast as possible using the 
minimum amount of 8080 Assembly Language code. 


c. The receiver would not perform any extra operations oa 
received data other than that Jone by the NI3ØLØ. No 
data was either written to any disk files or displayed 
on the console. 

4. Testing was done or data blocx sizes of 128 and 10500 


bytes per ZT8#ERNST frame. 

Testina was performed between two INTELLEC systems and 
data was collected for both the above data block sizes. 
The results of the experiments are shown in Table 3.5. 

As shown below, the highest data rate achieved was 1.764 
Mezabits oer second. The time taken in each 6.8 millisecond 
period was accounted for as follows: 


1.2 msec Actual Sata Transmission of 15279 Eyies 
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Io; e C Instruction Execution to Restart Transmit 
3.5 msec DMA Operation of 15ØØ Bytes at 428 XBps rate 
1.6 msec Execution Time of NI3Ø1Ø Sen? Command 


6.8 milliseconds total 


Table 3.5 Maximum Performance Data 


¡Data Bytes per Frame | Frame Transmission | Data Rate | 

Interval Ee 
‚PA 2. RMS seconds 379 Xbps 
LEE 6.8 Milliseconds 1.764 Mbps 


The conclusions reached about the Ethernet performance 
were: 


1. The transmission speed is limited by the NI3Ø19 
controller itself. The NI3Ø1Ø Send command required 
longer to execute than either the actual transmission 
time of the fata or the instruction execution during 
each transmit cycle. 


e Ithoush the NI301% literature claims a DMA data rate 
of 1 MBps, the board could only achieve a rate of 428 
KBps. This limitatior could be due to the method in 
which the NI3012 onboard microprocessor is utilized. 
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IV. CONCLUSIONS 


ከጠ sën i Q a Q s G a Q umb 


This thesis has shown that functional Local àrea Network 
communication software can be structured according to the 
ISO OSI network model. This thesis has also shown that 
the performance of the Ethernet substantially reduces the 
transfer time of data between connected hosts when compared 
to methods previously employed. The single to double 
density transfer rate improved by a factor of 7.5 while the 
VAX to INTELLYC transfer rate improved by a factor of 3.2. 
The data also shows that effective data rates can be 
መረጠን ከ ይን ያጣ by faster host processors, but that hosts will be 
limited by the rate at which the NI3012 can transfer data 
to and from host memory and then send it. INTELLEC hosts 
are also limited in actual network use by the rate at which 
data can written to or read from disk drives. 

An improvement to the effective data transmission rate 
ከ ንክ ከ be realized by synchronizing the speed between sending 
and receiving hosts by some method other than the stop-and- 
mart protocol utilized in this thesis. The transmission 
rate performance degradation noted above is only aggravated 
sing the stop-and-wait protocol. 

The software written for this thesis can be adapted to 
rur on an Intel 3086 based system by following the steps 


listed below: 
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The PL/I-29 source code files can be directly compiled 
using the PL/I-86 compiler. 


The 2080 Assembly Language source code can either be 
hand-translated or translated by software such as the 
program XL7-85 into 8086 Assembly Language source 
code. It should be noted that there are differences 
between the 209829 and 828€ processors that have to do 
with how interrupts are handled that will require some 
rewriting of the converted code. 


ot 





APPENDIX A 


NISØLØ COMMAND LISTING 


Code(Hex) | Command Function i Feturned Code(ier) 
01 Set Module Interface የ2 0 . . - 
Loopback 
22 Set Internal Loovback 22 
23 Clear Loopbacx 20 
24 Set Promiscuous Mode 2€ 
05 Clear Promiscuous Mode 22 
26 set zeceive on Error oc 
Mode 
27 Clear Receive on Error 29 
Mode 
25 oo ots line 09 
29 20 Online 99 
PA mine Onboard Diaznostics Diagnostic Codes as 


shown in Appendix C 


18 Report/Reset Statistics 22 

19 Report Collision Delays 22 

BE Load Transmit Data 22, 22 

29 Load/Transmit/Send Data 20,21,05,25,06,902,23 
2A Load Group Addresses 22,25 ,24 

e Delete Grour Addresses OO, DD, HÄ 

SF Reset 22 


Notes: Promiscuous Mode receives all networx traffic. 
Receive on Error receives even bad frames. 


CA 
(D 





APPENDIX B 
NISØLØ REGISTER LISTING 


Register | | on 
. Command Base Port Address | 
Status(Conmand) Base Port Adiress+ @15 
Transmit Data Pase Port Address+ 028 
Receive Data Base Port Address+ 35H 
Status(Interrupt) Base Port Adiress- 957 
Interrupt znable Base Port Address+ 3&5 
Extended Bus Address Base Port Address+ 29H 
High Bus Address Base Port Add4reəss+ DAT 
Low Bus Address Base Port Ааїге<5+ Usa 
Flp Pyte Count Base Port Address+ 2CB 
imow Bus Address Base Port Address+ ODE 


Note: The base port address is set on the TIP switch onboard 
the NIS@12. 
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MPENNDIX C 


NISG19 STATUS REGISTER CODES 


E Normal Mode: 


Code(Rex) | Command Status Result 

20 . 591659. . . - 
ኃጊ Success with Retries 

22 Iliezal Command 

925 Inaporopriate Command 

GEI Failure 

25 Buffer Too Large 

@6 Frame Too Small 

Ze uses ie ce i Vis os 

QA Purter Aljzament Error 


e agnostic Mode: 


Соде(Чех) | Returned Diaznostic Result 
DO Success 
01 ЧОЧОК cronrocessor Memory 


Checksum Error 


22 NE ከ ሞን 

23 Transmitter Error 
24 Receive De srror 

85 Loopbacx Failure 





APPENDIX D 
TRANSMIT DATA FORMAT 


7 ሯ 

BART A | Destination Address 3. (3yte 1) | 

DO ES EE EE | 

I | 

፦ 1 | Destination Address R. (Byte 2) i 

[በጠ E መሙ arm cit en 

- 2 | Dest. Addr. C. ( Byte 3) | 

| -<----- nn EE መመ | 

E. Dest. Addr. D (Byte 4) | 

| ES ME DE TE EEE LÊ I 

I ! 

EE | Dest. Addr. Z. (3yte 5) | 
iN EED an å es es ins 

| I 

+5 | Dest. aar F (Byte 6) | 

En an alu = е | 

! | 

+6 | Type Field <7:Ø> (Eyte 1) 

| | 

jwaww PEER re | 

+ 7 | Type Field <15:9> (3yte 2) | 

RENE ds a ТЫШ ЛО ЖО ee ты о 

> EE Data-First Byte | 

ጠስ sa x 

I | 

| | 

| | 

| | 

| | 

| i 

j-____-_=-----------------=-------------- 

BAR+BCR-1 | Data-Last Byte 





APPENDIX E 


RECEIVE DATA FORMAT 


? Q 
Md ———— EAS gr TE En bl — i 

BAR+ 0 | Frame Status 
ME EE EEE DN ETTE aa å ar mim I 

I | 

+ 1 | Always 9 
EE EE EEN I 

| | 

+ 2 | Frame Length <7:2> l 
DEE EE e a m 1 

| | 

+ 5 1 Frame Length <15:8> 
NEE EE Ee 

1 | 

+4-9 | Destiration Address( 6 Bytes) i 
aa л a TE å ፌሬ ር ar vr or å na BE | 

| | 
+19-15 | Source Address ( € Bytes) 
I ec AAR ETE ESEL EE ESE ELE EE | 

| | 
КОЕШ Туре Field 47:2» | 
I 1 

1 Lo EE EE ЫЛ ራሙ. ር. ፥" መ. -።-- ሙ መሙ! 

+17 | Type Field <15:2> 
EE ee | 

I 

+18 | Data First Byte | 
1 I 
i o ! 

| 

1 | 

| ። | 

| | 

| ° | 

| 077217 7 | 

I Data-Last Byte | 

| | 

| Wai ai n uer uemtcegumuuntomsm | 

ИШ СОС 4212 | 
WS E ы с E I 

I | 

| ORG <16:23> i 
E EE E ы ж | 

| | 

ን ክ. ሙ፡1መ22 | 

| ! 

I s LI 
BAR+TRLTU-S coco: 
| I 

| i aa Т Ыргу — TT [ 


Note: “rame length is counted from first destination address 
ብክ up to and including tke last CRC byte consecutively. 





e E OK 
SOURCE CODE OF PROGRAM ETETESTA.ASM 
ፍሯፍፍችፍችፍችችችፍ፡ sie sete otto ot zie c OE o cie te o te oe o atte sco sco nol o Ad RR ae e ade e RÍE 


36 35 3 
жж жок жж жж ed de de de ote ois ale oe op e te te se ote ote te aic ojo de de док жс ЖК ЖОК КА ee e be aee ee aK a E 
ENEERNYEI EEVEL ONE TEST PROGRAM--VERSION 1.13 


; PROGRAM LE NAME: ETSTTSTA.COM- INVOKE COMMAND: ETETESTA 


; PROGRAM FUNCTION:(RUN CN 8999 BASED MDS SYSTEM) 

*COMMANDS THE NI3ØLØ BCARD TO GO ONLINE, PERFORM ITS’ 
¡DIAGNOSTIC TESTS THEN TRANSFERS A 42 BYTE DATA BLOCK FROM 
“ADDRESS 0608 HEX TO ADDRESS 2812 EEX VIA THE MODULE INTER- 
GE LOOPBACK MODE. TRANSFERRED DATA IS THEN DISLPATED ON 
Mme CONSOLE. THESE TESTS ONLY REQUIRE THE NIS@10 BOARD. 
NRO CABLE TO THE TRANSCEIVER NEED NOT BRE CONNECTED. 


SIS PERFORMED: 
1.) ONBORFD DIAGNOSTIC SELF TEST 
СОО МО INTERTICE LOOPPACK TXST-VERIFIES THE 
FUNCTION OF TEE NI3SG10 LESS THE MBECIIVE 
RUFFER. 


NISØLØ ETMERNET BOARD CONFIGURATION: 
ШОО О ОМО SET TOSLNEERAUST LEVEL 5 
2.) BASE PORT ADDRESS SMITCHES SET TO 
1011 (20380H). 
SIDA CIAL PRICRITY TO AN ODD NUMBEZED 
UTE BUS SLOT. 


$0 we we We DO 96 DO O DO DO 4020 We we 


¡ORIGINAL PROGRAM: 05/19/25 


¡LAST REVISION: 94/39/83 


f 

ETER: MARK D. STCTZ=? 
ADVISOR: PROF. U.R. KORES 
Eee Axe Ze Må pe eae e ale eae nao 
BRAIN PROGRAM: 


CRG 100 
+ NIS012 REGISTER PORT ADDRESSES: 
C REG SOU DOBORCMD REG LOCATION 
SREG EQU COBIESCMD STATUS REG LOCATION 
13:15 (5 EQU AVE SI INTERRUPT STATUS SEG 


T 
CA 





IEREG EQU CCBSE; INTERRUPT ENABLE REG 


EBAR EQU 00397; SXTENDED BASE ADDR REG 
HAAR EQU C€CBAE;HIGH BASE ADDR REG 
LEAR 2:20 ØØSBE LOW 3ASE ADDR REG 
HEREG FQU OOBCESEIGH BYTES COUNT REG 
LRREG EQU QOPDF;LOW BYTE COUNT REG 


pe e e e e e e te te ee e e le e le e ae ce ate te e e sex sex ote ST YR de aK Re EK a a AE ቾፍችቹ eoe xt sie rex 
sOTHER NESDED ADDRESSES: 


BDOS SOU CDi BDOS ENTR? POINT 
CEREG EQU or QØH; COPY OF INTERRUPT ENABLE REG 
LASTM EQU COD DDP OF INIT STACK PTR 


O HE ME aK NC Bi A AEA NE RCA A a A EE ARK A te A e e ee e ee OK aS E A e te 
s NEEDED BDOS COMMANDS: 


CONSIN EQU AU EO SOUS CEAR INPUT 
CONSOUT EQU ØR CONSOLI CHAR OUTPUT 
PSTRING EQU O9ESPRINT TEXT STRING 


EE 


MAR COMMAND STATUS REGISTER 3Y READING 
IN SREG 
EE 


JUMP INSTRUCTION- FOR INTERRUPT SANDLER: (INT 5) 


MVI A,ØCSHEsJMP INST CODE 
STA 902897 :LOAD IT IN ADDR 2025 HEX 
LXI BI INTEDL 


SIDO ወመ መጋ: 
፡ ፍ#ሯቻቹቸሯቻቿፍ siete ate nate le ole ate te tete oe oe xe acte E ae e e nie le se feste e cate siete ate SE IR OR AS OR AK SK AK 2E E ፍፍ 
¡OUTPUT INITIAL MESSAGE: 

LXI D,BMSG 

MI CRISTO ING 

CALL BDOS 

CALL CEN 
mer UP INTSRRUPT CONTROL: 


MV I 2, MZA 

OUT OTDA 

MVI A,@DFH; ENABLE INTERRUPT S-aTHERNET BOARD 
OUT ERC? 


o E еж кк жае gei fe ale le al ji A E e e a e FEE SK eak E ake a de He de de de E 
በ TRANSMIT DATA BLOCX-FIRST 5 BYTES ASSIGNED 3Y XEEZOX: 


КҮТ A 228 
STA 26207 
MV I A,O7H 
STA Dog. 
I AL ØLH 
STA 06229 


BAD INTSRLAN ASSIGNED LAST 3 BYTES HERE: 
ESSTINP CALL CRLF 

LXI Dons £0 

MV I DS BEING 

CALL BDOS 

CALL CRLF 

LXI ሀ ክታ. 





DADDR1 


DADDR2 


‚LOAD TYPE 
ALDIN 


MOE: FOR THIS TEST THE ACTUAL DATA IS IN 


MWoes-0632EEX FOR TRANSMISSION 


MVI 


C,PSTRING 


CALL BDOS 

CALL CRLF 

LXI D,DMSG2 
MV I Cees ING 
CALL BDOS 

CALL OSEE 

MVI C,CONSIN;READY FOR CHOICE 
CALL BDCS 

CPI 514 

JZ DADDR2 
CPI ver 

JZ DADDR1 
CALL CRLE 

LXI D,DMSG3 
MVI GES SING 
CALL EROS 

CALL CRLF 

JMP DSSTL IN? 
CALL CHEN IM ADDR 2Ø9-23-854 SELECTED LOAD IT: 
MVI A, 90H 

STA 26037 

MV I AA ASA 

STA 06@4Н 

MV I A,2EAE 
STA 26951 

JMP ADDIN 
CALL CRLF IF ADDR ØØ-94-ØA SELYCTED LOAD IT: 
MVI A, @9E 

STA d6C3H 

ST А,24Н 

STA >» GOZAR 

T A,VAR 

STA gor on 

wipe GD—- 2 BY TES: 
MVI A ,O@H 

STA @6@6Н 

MYI SIAT 

STA 06078 


ADDRESSES 


EEE EEE TESE ETT EEE EET TET TETTE ie Me se de de de ie ste oe tee o o 
SSD IN THE TEST DATA: 


¡GO ONLINE 


ከ 
LXI 
CALL 
CALL 
CALL 
CALL 


EES ING 
D,EMSG 
BDOS 

GREN 
CONIN 
CRLF 


SON PCWRe UP: 


ET 


Seon M 





EI 


MVI A,O0GR$CMD TO GC ONLINE 
OUT CREG 
LXI D,OLMSG 
MV I CBS RING 
CALL BDOS 
CALL CRLF 
CALL READ 
moon ONSCARD DIAGNOSTICS TEST: 
MVI Eeer GODS FOR SELROSBSST COMMAND 
OUT CPEG 
LXI Ee ect 
Kat) C ,PSTRING 
CALL BDOS 
CALL CRER 
CALL READ 
Nett DU GK INTFRFACE LOOPBACK TEST: 
ET A.O9H; GO BACK ONLINE 
OUT CREG 
LXI D,OLMSG 
EN I ER PING 
CALL BDOS 
CALL CRLF 
CALL READ 
BUND INTSRRUPT ENABLE PEGISTER=4. SET TO RECEIVE DATA. 
DI 
LXI E, CERES 
MVI A 04 
MOV 11:10. 
OUT TER EC 
ЕТ 
ሽሽ ክስ COMPLETE MODULE LOOP TEST: 
I СОСН; КТЕ МОО ЕЕ LOOP TEST MODE 
OUT CREG 
LXI D,MLMSG 
DEVI Co NG 
CALL BDOS 
CALL Gabe 
CALL READ 
CALL PEMSG TRANSAT TEST DATA BLOCK 
LXI DANS O 
MV I Ges ZING 
CALL BOOS 
CALL Gene 
CALL READ 
SACRA RR ROI TEST ONL Y=MODULE LOOPBACK mene ne see sn nn ne Re de 
MR SA TCE ANABLES DATA TRANSFER TO EOST MEMORY IN TEST 
DI 
MVI or 
LXI He SG 
MOV Hua 





OUT I EREG 


‚ EAE AK AK Ee dr O AE e ОЛО ЖС ЖКК ЕДЕ К RC ЖОК ЖК ЖК HEIKE IHREN 


MVI Å ØSESCLEAR LCOP TEST MODE 
OUT CREG 

LXI D,CLMSG 

MVI GRE TRING 


CALL BDOS 
CALL CRLF 


CALL READ 
mee BACK ON-LINE 
MV I A,79R 
(WT CREG 
LXI D OLMSG 
MVI C,PSTRING 


CALL BDOS 
CALL G Lx 
CALL ИКАТ) 
ee GAL DATA T3ANSPER3Z25 VIA ETRERNET BOARD TO CRT: 
MV I C, PSTRING 
LXI D,LMSG 
CALL BDOS 
CALL CRLF 
CALL CONCUT 
JNE ኃ ¡RETURN TC OPERATING SYSTEM 


መይ ንን ክክ OF MAIN PROGZAM 
; жжжжжжж жж жж Жжжж жок Жее Ас Жж жок жож ade e ak He ee de He de de sg e eeh eech eebe E К 


` SE ade a ҖЕ e Ao e o o a a NE DIE NE E NE e ee AE ESE AE NE AE OS AK AE HK SIE EE EEE EK EAE AE SEO 
> TRANSMIT SUBROUTINE: 
TEMSG DI 
MOP UNTIL INTERRUPT ENABLE REGISTER 24 OR 4: 
LOOP LXI A,CEREG ; CHECK IF NIS010 BUSY 
MOV A,M 
GPI 003 
JZ CONT 
CPI 24F 
JZ CONT 
EI 
JMP LOO? 
CONT DI s DISABLE INTS. AND CEECK AGAIN 
LXI ЧУСЕНЕ( 
MOY AM 
CPI JCH 
JZ CONTI 
ORT Q4H 
JZ CONT1 
Sei 
JMP LOOF 
CONTI MVI ADDE 
LXI H,CERSG; DISAPRLE Tie NI3219 INTERRUPTS 
MOY Me 


67? 





OUT fees, SET INTERRUPT ENABLE REG = 2 
St 
ADDR1 FO U 00H, LOCATION CF TRANSMIT DATA START= 
ADDR2 EQU OCH; 600 EX 
ADDFS EQU AGH 
MV I A,ADDR1; LOAD TRANSMIT MESSAGE 1ST ADDR 
QUT EBAR 
MVI a ,ADDR2 
OUT ERAR 
OVT A,ADDRS 
OUT LEAR 
MVI ATCOHT LOAD BYTE COUNT 
OUT HBREG 
MV I el 
CUT LEG 
DI 
MVI ላ ጋን ENABLE NISU1G8 TDD INTERSUPT 
LXI q,C5REG 
MOT M.A 
CUT TEREG 
ЕТ 
DONE MOV A,My READ THE COPY OF IEREG=CEREG 
ኞ 06Н 
JZ DONE 
TESTS DVI A,029E; LOAD TRANSMIT AND SEND COMMAND 
OUT C2EG 
SET 


SEND TRANSMIT SUSRCUTINE 
noe e e e e e ie ጆች KAE NE OK xe xo x e ale e te toe c aote xo ex ee e re e 


ШОО STATUS SUBROUTINE: 


READ "VI Fo 1111112535 
EL C 700g 
EDLP IN ISR EG 
ОРА В 
T DOFT 
JNZ op? OOIE NL OO? UNTIL STATUS REG READ 
IN SE EG 
GP C 
JNZ EFMSG 
LXI AE 
VI (СОЛОН 
CALL 3005 
CALL CRUD 
ЧОР PDONE 
EH LG LXI D NMSG 
MVI CH 
JMP EDOS 
CALL CRLF 
RDONS RET 
s IND READ SUBROU 


1 NRE AE AE делел де жое >=> x< 





s INTERRUPT HANDLER: 
.... CPU STATE: 


INTEDL SI 
PUSE PSW 
IU SH E 
ere D 
BUSH g 
DII 
LXI Fo ee uo 
MCV BM, SAVE ENABLE REGISTER COPY VALUE 
MVI А,@@Н 
LXI 4, GEREG, DISABLE NIS0190 INTS. 
OUT Is REG 
MOV Кз 
Y AS 
MVI day IS REA INTERRUST ENABLED? 
CMP 3 
JZ RBA 
MTI POD IS RDDIINTERIUPT EE 
che È 
JZ RUD 
MVI A.2417; IF NEITHTR OF ARCVE THEN WAS TDD 
LXI H,CEREGs ENABLE RBA INTERRUPT 
MOV MIA 
OUT io CANE, 
JMP PINI 
PADD1 SU Poe So) AT DE TON TESSSCYD FRAME TO= 
F 4DDZ EQU eu; 2800 HEX 
RADDS EQU Get 
REA MVI A,RADD1; LOAD THE ADDRESS REGISTERS 
OUT EBAR 
MVI A,RADDZ 
CUT ЕЗДЕ 
MVI B,RADDS 
OUT EA 
MVI A,00R; NOW LOAD BYTE COUNT REGISTERS 
OUT Hep v 
I A,940E 
OUT LBREG 
LA 1 LEEG 
MCI ЖОО ንንን ከከ ሠ ስህ) INNSRAUPT 
MOY ME 
CUT IERZG 
JMP SINI 
ELL el НО ЕРУ 
MVI Å ØST 
መክ .]”ፖሽሮዊ PROCESS WAKE UP IN HEES 
MOV MA 
OUT IEREG 
BEN! o 


ሸን TORE CPU STATE: 





PO? E 
POP D 
POP R 
DI 
MVI АЧ ООН Eo TOR INTERSUPT STATUS 
OUT FDI 
POP PSW 
EI 
RET 
SEND INTERRUPT EANTLE? 
See ee e ae a e de AR Me RE de te ne ote ote ole aes xe ote ui oto N de de A E a de Кз Ж xe x Xe ote ole ake 


CRLF MYI C,CONSOUT; GFNFRATFS CARRIAGE RIN +LINE 
MV I 7,ØDE 
CALL anos 
MVI C,CONSCUT 
MVI E, JAH 
EDT 5805 
RET 
y WE ASAE AE AE RE RE OS MENE AS SIE OK IE AS AS OS SK OE NE SIS RE AE OKC RE ENE RE OK OE AE OE HENCE OS CE IE KE OK XE IK OK RE OK AE OK oH OK NE NE 
CCNIN E E,26PBE; PEAD TEST DATA INPUT FROM CONSO 
INLP MVI C,CONSIN 
PUSE E 
CALL 3DOS 
PO? H 
MOT M,A 
CPI 6ØE; COMPARE TC GRAVE ACCENT 
SE 
INX 3 
JMP INLP 
ብዱ <> HE NE NE DX RAE AE ASE IK OE SE TIE HE IB BS SK EE I EA HE OE OE AR AK RE OE ROA TS OS TE AE ት ተ.ዱ ተተ ተጉ ትት. ንሪ ce 
CONOUT LXI H,0912E; OUTPUT TEST DATA TO TEE CONSOL 
OTLP "VI C,CONSOUT 
MOV E.M 
MOV A, 
CPI SØRSIT GPAVE ACCENT TEEN RETURN 
RZ 
PUSH q 
CALL 310$ 
РОР E 
INI E 
JMP OTL? 
re NÅ TE RR RE NN 
3MSG D3 (ETHERNET LEVEL ONE TEST PROGRAM: VERS” 
DB "ION: 1.13: 24/30/82-MD8$^ 
OLMSG D2 “ONLINE COMMAND ISSUEDS ” 
STMSG DB “SELF TEST COMMAND ISSUEDS” 
MLMSG De “MOLULE LCOPBACY COMMAND ISSUEDS* 
CLMSG DB ‘CLEAR LOOPBACK COMMAND ISSUEDS” 
TECMSG D3 “TRINSMIT/SEND COMMAND ISSUEDS” 
MSG DB ‘COMMAND EXECUTEDS ” 
NMSG DB “COMMAND FAILEDS” 





FMSG D3 IND Mexia 2 CHAR MAY) “ROF MODULE” 


13 INTERFACE LOOPRACX(42 CHAR MAX) ⁄ 
DB (END WITH A GRAVE ACCENT=> `)S” 
LMSG DB “THE DATA TRANSFERRED VIA MODULE Ee 
DB “AGE LOOPP AOK 15:5 
DMSG 2 DR "ENTER ADDRESS OF INSTALLED NI321D“ 
DB ^ BOARDS’ | I 
DMSG1 DB OG NO 1! 5. 
DMSG2 DB “BCARD QQ@—-Q3-FA:ENTPR " 2 "s^ 
DMSS3 D? “INCORRECT SELECTICN-TRY AGAIN:S" 


oe RE RE e o s ie e ÃO Siae Ne NE e e e ac ae e e e ate a OK te ite ii КЖК ЖК АС ЖОЖ АК ЖКК ККК ХО А: Жек Ао Ж ED 
O E e e e e este Die ice sc ie ie le ic e e de e e tc te e te E a a e soto toco xc oro к ЖЖ Жжжж жок See OE 
UND) КЕЧЕТ LEVEL ONE TEST PROGRAM-VERSION 1.15 


ate 
bad 
ake 
e 


o 





ARENDT A G 


ooN GE Ge: Or PROGRAM IE THROSTB.AS M 


O e teak eae Me See Sema a He 
o stc le o ete ze olei ote ted aa Ж ok ote ae i be ae a te te te ae eae a a a ДЕ Ж ЖЕ ЖЕ ЖОК ДОК ЖКК эк BI BH EO E 
ጠጡ ዘይ ካህ SECCND LEVEL TEST PROGRAM--VERSION 2.24 
, 


ወ ላክ FILE NAMZ: ETHTESTB.COM- INVOZE COMMAND: ETHTESTR 


PROGRAM FUNCTION:(RUN ON &98@ BASED MDS SYSTEM) 

MEE TEST.IT THEN TRANSFERS A 42-BYTE BLOCK OF TEXT FROM A 
s BLOCK OF MEMORY STARTING AT ADDRESS @700 HEX TO ANOTHER 
MIE IAT 09029 RES IN TWO SEPARATE TESTS VIA THE NISCIE 
EE, © SUCCESS SUL COMPLETION OF TEESE TESTS VERIFIES TEE 
SEUNCTIONING CF ALL TEE HARDWARE NECESSARY TO COMMUNICATE 
EN OTHER HOSTS ON THE NETWORK. 


9 

PIESTS PERFORMED: 

E. BOAPD DIAGNOSTIC SELF TEST 

ER PROCURE INTERFACE LOOPBACK-VEXIFIES TZ 
FUNCTIONING OF THE NIG@1@ BOARD INCLUDING di 
NMIO PROTOCOL MODULE. 

SE Л ООКАТ LOOPRACK-VESTEIES THE FUNCTIONING OF 
ABOVE AND TRE PLAT CABLE, TEANSCELVER AND 
BS N FE COAXISL Cao: 


Sole STEERNET BCARD CONFIGURATION: 
ioe SET TO TREF PT Level 5. 
2. NES. PORT SORE ESS SMIT CHES eset TO 
12318 p ). 
A PRECIO TC AN ODL NUMBERSD 
GETS SLOT: 


do Vo so LO, “0 DO we we we we fe ‘00 20090 


‚ORIGINAL PROGRAM: 43/31/83 
LAST PEVISION: 24/32/85 

, 

ር. BR: MARKE D. 21022 52 


ፃ 
Meri OR: PROF. U.R. KOTRSES 
, 
; жжке жос желе Se ole Red Me de Re He de RE de Re N de Re de MERE de ER Ne RR ER AA e Si E 
Жжжж: жжке жос дек Жк e e eeh ee ee e he ee ሄቻ ፡ 
MAT N PROGRAM: 
SEIT GIN 
Dm 


1 
iv КЕбСТ5ТЕНҢ POOT ADDRESSTS: 


Se 





CREG EQU JL BOM, CAD REG LOCATION 


SREG SOU ጋሪን ከ MD STATUS REG pe ION 
ISRIG EQU JØRSH; INTERRUPT STATUS RE 

I ER EG EQU ØØBSHJINTYRRAUPT ENABLE SCH 

NEAR SOU ØØRGRLYXTENDYD PASE ADDR REG 

ABAN EQU @@BAT;HIGH BASE ADDR REG 

LBAR EQU ZØRRBESLOW BASF ADDR REG 

H3REG KOU QG3C8S;HIGE BYTE COUNT 2EG 

LBREG KOU CZSDH:«: LOW .BYTE COUNT BEG 

MEN ope eee ምችን ንንንንገገፓን ንን ንን ንንንንንን ንንን He ote ate xe oie gå ae e 
EER NESTED ADDRESSSS: 

EDOS FQ U BBASZSBDOS ENTRY POINT 

C EF EG EQ U BEYAA, COPY OF INTERRUPT ENABLE RES 
STATUS EQU PSAE COPY OF CMD STATUS REG 


Steen жк ккк de Mede Ned e К e sk e ae ie cate e te de de de de Me Ne De Re OK DE Ne AE De de ፍፍ ፍች ፍፍ e e e e ae e K 
s NFEDED EDOS COMMANDS: 


PSTRING QU DOSE MEINT STRING FUNCTION 
CONSIN OU EHS CONSOLE CHA? INPUT FUNCTION 
CONSOUT FCU del, CONSOLE CEAR OUTPUT FUNCTION 


oak oe ahs He ois XE ode ie de dk ede ede N mae e ea te e К e e fa aa e e a RE NE RE RE К э) ХЕК ЖЕ ЖК ЕК сок Жо 
CMD STATUS REG ON POWER UP: REQUIEED FOR INITIAL IZATION 
IN SREG 


exco sie xe x oe sea xe xe ox ene k: ee e cate ate i sto zoe ae ae e ee e RE de ee e e e at A sk SK 
s OUTPUT INITIAL MESSAGE TO USE? 

IKI DAR ISC 

MVI eet NS 


CALL BDOS 
CALL CRLF 
ሙን JUMP INSTRUCTION FOP INTERRUPT HANDLER: (INT 5) 


Ví A ØCSE: Lë INST CODE 
STA 20203 LOAD IT IN ADDR 0928 ESA 
LXI # INTEDE 


SALDO 00225 
O ጆች te e e sie SK IS BE I AK AE BEE AB He AE Re a К e lc te i n seo o de e e nie e le ie e lee ne ae le ate ORC ፍፍፍ፡ 


oer UP INTERRUPT CONTROL: (INT 5) 


+ 
3t 


MYI Ae T 
CUT ØDE 
MVI RE INTERRU T ማመ ና ብ ር ጆፌ. SCARE 
QUT @FCH 
0 ERE S MEME OR de RE e EG e e ale nie e fe e e ae ae se le e KESE de te ee dek eh e ee eh ek e ee e HE KEE SEE IE HE HK HE e HE 
ERU TRANSMIT DAT* BLOCX-FIRST 3 BYTES ASSIGNED BY XEROX: 
MVI qe a 
STA 07008 
MVI Ee 
STA or JF 
MVI ላ ከ 


STA DUDES 
ን ክን INTERLAN ASSIGNYD LAST 3 PYTYS FRF: 
PESTIN? CALL CELF 


LXI pauco; ASK User Te INPUT THIS ADDESSS 
MV I SES TING 





DADDR1 
DADDR2 
:LOAD TYPE 
ADDIN 


medie: YOR THIS TEST TIE ACTUAL DATA 


CALL 
CALL 
LXI 
MVI 
CALL 
CALL 
LXI 
s E 
CALL 
CALL 
MVI 
CALL 
(ET 
JZ 
CPI 
J2 
CALL 
LXI 
MVI 
CALL 
CALL 
due 
CALL 
MVI 
SA 
MN I 
STA 
SIVE 
STA 
JMD 
CALL 
MN I 
STA 
MVI 
SE 
MVI 
STA 


E mp 


MVI 
SL å 
мүт 
STA 


BDOS 
503] 
RMS GI 
Ca SS DRING 
BDOS 
CALF 
DIS c 
ERES O UNE 
BDOS 
G 
CUGONSINSREAD USER INPUT OF ADDRESS 
BDOS 
31H 
DADDR2 
SeH 
DADDRI 
CRU? 
DO 6 
Gayot NG 
BDOS 
CRET 
DESTINP 
CRESC ADDR QO-GS-EA SELECTED BT USSR: LOAD 
An KEE 
07033 
A 238 
9790497 
A GERE 
@?@©Н 
ADDIN 
CRET, 
rt 
07058 
ል ፈቂ! 
ር 
A.2*E 
DIES 
үз. 
А,20Н 
26268 
A 295 
LES 


ADDRESS C0-04-%4 SELECTED:LOAD IT 


IS IN ADDRESSES 


me ce-0652EEX FOR TRANSMISSION 


"See ee tc seg cle ook tente å ae ne e cte e e e ale e Se siete ea e siete Yk sa siz sz XK te eae de ae al a es 
መር IN TEE TEST DATA FOR MODULE INTERFACE LOOPBACK TEST: 


“ү 
LXI 
CALL 
CALL 
CALL 


nto ele Vo de 
MAS ASI 


STRENG 
D, PMSG 
3DOS 

CRL7 
CCNIN 


(3( 
ዘ 





CALL CRLF 
¡CO ONLINE UPON POWEP UP: 


El 
MVI K.OS9ESCMP TO GO ONLINE 
OUT CREG 


CALL READ 
š MAER AR DE e epa nie e e e hee de ee x жок Жк Жек жж жолок кж жк жож ж жс сок Азис 


MEAN ONBOARD DIAGNOSTICS TEST: 


MVI A,ZAH: CODE FOR SELF TEST COMMAND 

OUT CFEG 

CALL READ 
š e e e e de e AHE XK ок кде NE XE Xe zi ole o oe e ae oe HE ЖКК HE 2 E E S HE NE A ME FO ag EG ae HK FK HE OX 
RUN MODULE INTERFACE LOOPBACK TEST: 

MVI A,@9H; GO BACK ONLINE 

CUT CREG 


CALL READ 


¡LOAD INTERRUPT ENABLE REGISTER-4. SET TO RECEIVY DATA 
DI 
LXI p EE 
MVI А,@4Н 
MOV M.A 
OUT HEESE 
EI 
EDMMAND MODULE INTERFACE LOOPBACK MODE: 
MVI KJØRE 
OUT CREG 
CALL READ 


MANS Tola TSE TEST DATA: 
CALL TEMSG 
CALL READ 
ME PLAY DATA TRANSFERRED RY MODULE INTERFACE LOOPBACK 'T5ST; 


MT ነን PING 
LXI D,LMSG 


CALL 3D05 
CALL CRUT 
CALL oe Text OUTPUT TC THE CONSOLE 
CALL CILE 
noe ce ale RERE te sete AK SENE AERE SK de NE te e ae e e e pe a ea e e ee e EK E Ae A e жк ккк жок Жкн жок сиик си ж 
መክ TORM INTERNAL LOOPBACK TEST: 
ሽበን IN TEST DATA FOR EXTERNAL LOOPBACK TEST: 
Ex EE 
Б] D,FEMSG 
CALL BDOS 
CALL CRLF 


CALL CONIN 
CALL PEEL I 
ERUIT INTERNAL LOOP TEST MODE: 
MVI Å ,Ø38 
QUE: CFEG 


CALL ДЕА?) 
GU BACK ONLINE: 


on 
Сл 





Nal 


OUT 
CALL 


ዚዜ ከ111 TES 


CALL 
CALL 


A,29H 
CREG 
R 74D 
DATA: 
TRMSG 
READ 


ma PLAY DATA TRANSFERGED TIA INTERNAL LOOPBACE TO Car: 


MVI 
LXI 


CALL 
CALL 
CALL 
CALL 


JM? 


Cao TRING 

Bet 

BDOS 

CELE 

CONOUT 

CRLF 

2 st ETUAN TO OPERATING SYSTEM 


mem OF MAIN PROGRAM 


) 


3 


NC Sic zi zie ic ste sic te oe ee og nie x oc ote ik oi О Ж ae He te c ste ote ote ote ste cte ЖЕ ale a he aie ae he os he sg ake ok oe fe Se ake oe a ie oie He ag le ente 


elo te 
x øy» 
° X > de DNG NNN DE MINE RE E NR ፡ 5። 5: 3፡ 3፡ 2 ›ጾ ኳና ኣኛ 3 SR ONDA SRS DOR DAS ER ASI ጻ፡ ጓ፡ 2፡ ጃ፡ ጓ፡ AE EK AE HK CE Ok OK NE ER OK OK OS 


መን SMIT SUBRCUTINZ: 


TAMSG 


Meer UNTIL INTERRUPT ENABLES ABGISTER =D Ca 


LOOP 


CONT 


BONT] 


BEDR 
EDDz2 
ADDR3 


DI 


LAI 
MOV 
Cet 
ህሪ 

GET 
JZ 

EI 

Ja? 
DI 

LXI 
MOV 
G I 
JZ 

GE 
Ja 

BI 

JMP 
MVT 
LAI 
MOV 
OUT 
EI 

BCU 
EMU 
EQU 
ML 
CUT 
MVI 
OUT 
ኣዳ MET 


CUT 


H> 


Ba TG 
Au 

ger 
CONT 
943 


e tm 


CONT 
LOOD 


Suc 
AG 


3 
"mr DNCIEHRUPT ENABLE REG = Q 


DOES EROCRTION SCH ITDENSMTT BUNESR TO? 
Ø7E 
22፡7 
zu E EE 15T ADDR. 
PRA? 


BE 


(n 
O) 








MVI A,OCH+ LOAD BYTE COUNT 


OUT BEREG 
MVI A,952H 
OUT LBREG 
DI 
MY A,@6H; ENABLE TDD INTERZUPT 
LX 1 H,CEREG 
MOY MA 
QUT ISR EG 
EI 
DONE LXI Ho ES 
MOV BRE) RR SCOPI OF TEREG=CHREG 
CHI JER 
JZ E 
PESTO MVI ‚3293, LOAD TRANSMIT AND SEND CCMMAND 
OUT dr 
REC 


ND TRANSMIT SUBROUTIN* 

e se ok de de e s ne cte texte t zt zoe se xe te cte oe te tete ጅቻ ደ sex oe x ea xen ЖЕ å eee ie Be a eH aE a 
= 

A 


S T ATUS SUBROUTINE: 


AD MVI 1. 111118 

MVI C roaa 

RDLP IN IS REG 
ORA È 
CPI QOWYH 
JNZ Ae CONTINUOS LOOP UNTIL STAT REG READY 
IN Sees 
LXI Poa lo; es ene COPY OF CMD STAT R3 
MOV M 
CaP ሠ 
JNZ SENSE 
LAT DEMSG " 
MNT We 
CALL RDOS 
CALL CRLF 
JMP pu 

BEMSG LXI D,NMSG 
MI ሆም ን ህከ 
CALL EDOS 
MVI В СОЕ 
LXI F STATUS 
MO Y A.M 
ADD 3 
MVI WE CODESTO CONSOLE 
MOV EA 
GALL BUS 
CALL COL. 
LXI ES Eh 
MVI G MS EM, 
CAL £205 
CALL CRL? 





EDONY RET 


END READ SUBROUTINE: 


‚кд DE DE SR NE NRE > z RKK 


dese de dee dee dee ek he ote zie ole le ote le sese ate ste ote sje ste si cle e ste cie ote oie se ote iecit eec se 


RRE D ET HANDLER: 


SAVE CDU STATE: 


INTHDL SI 
BUSH 
AUSE 
PUSH 
PUSE 
DI 
LXI 
МОУ 
MVI 
LXI 
MOT 
OUT 
MOV 
MVI 
CMP 
J2 
MY I 
GP 
JZ 
UNI 
LXI 
MOV 
Ci 
JMP 
RADD1 OU 
RADD2 БОП 
SREL D. ECU 
REA MNT 
QUT 
MYI 
CUT 
MVI 


PSW 
B 
D 
H 
,CEZEG 
NA DS REGISTER COPY VALUES 
oe DISABLE NISQ1@ INTERRUPTS 
Or a, 
E 
BEREG 
B 
A 


* +» 


H 

B 

A 

H 

М 

i 

A 

R 241, WAS “BA INTERRUPT ENABLED? 

B 

RBA 

8,07H; WAS RDD INTEFKUPT ENABLED? 

B 

RDD 

A,O4H; IF NEITHYR OF THS ABOVE THEN 
H,CEREGS; WAS TDD— NCW ENABLE ABA AGAIN 
Me 

IEREG 

PINI 

2089 LOCAMLON OVER: TO WRITE RECVD 
BOE RAME DATA ተ HOST MEMORY 

CAE 


A RADDI; NOW LOAD ADDR INTO ADD? REGS. 


“a 


ae 





GU: TEREG 
FINI EI 
MES TOR CPU STATE: 
BOP 
FO P 
EO 
DI 
MV I A,9027H: RESTORE INTERRUPT STATUS 
OUT ØFDE 
POP PSW 
ЕТ 
ВЕТ 
mone INTERRUPT HANDLER 
O e e xe sete te e ote oe oe o ie oie t ote te a Oe OE eK AS de de de de Me de de de de N de ME RUE Re aee 


LO CO 


CELF MUI C,CONSOUT; GENERATES CARRIAGE RIN +LFEZD 

MV I Pr, ØDE 

CALL RDOS 

MVI C.CONSCUT 

MII Soa 

CALL 3D0S 

RET 
Lee ee E ee E ET NE DEE EE NE De N Me RE E e E CR АСЕ AS AE ME OE RE HE ENE BENE OE A ER EE AK AT EE IE AE OK 
CONIN T E,0708E5 READ TEST DATA INPUT FROM CONS. 
INLP MV I C,CONSIN 

PUSH Н 

CALL RDOS 

POP H 

MO Y MA 

CPI SØHSIF GRAVE ACCENT THEN RETURN 

E 

INX q 

JMP INL? 
‚ MEA IE AE ACRE HE KI AC EAS BRAK He AE AE HE IE HE FE OES HS HS AE HS HE ZT AE KE DE ME RE ME дЕн ЖЕСЕ АЕ ЫК NE DE 
CONOUT ТЇ 7 26125; OUTPUT TEST Dati TC THE CONSCLE 
OTLP MVI C.CONSOUT 

МОХ T,M 

MOT A,E 

CPI EQU; TEST FOR END CEAR-GRAVE ACCENT 

22 

PUSE 7 

CALL BDOS 

POP H 

INX 7 

JMP OTLP 
"See e Xç X e KNE FE RERE IK AE e E E RR SEE SEAE SE SE EDIL I Ke E E O RIN A ARE E E K E RK K K K R ER Sé SE = > 
BMSG DB 'BTEEENET SECOND LEVEL TEST PROGRAM: 

DB * TERSION 2.24: @4/3@/R2-MDS$” 
DMSG2 D? ^€NTT? ADDRESS OF INSTALLED NI3912 ^ 

DB EOS Ss” ] 
DMSG1 D2 “ROAR QGO-QCA-QA:ENTER ” 1 “$” 
DMSG2 DA “2023D Dë EA ENTER 2 5” 


° 





DMSG3 D3 “INCOPRECT SELECTION VUMBER-TRY AGAIN: 


e e le zik o E ЖоК Ж хок Де К e e e e e e se e te i lea he e ie ee ce o oe oe xe xe ot e ae te 
a Re Re ETE He де ste эк eae ote de ae ote ote s oj cte ote oe te se se rte tete cete rte ote ge oe gd e NK SAE e cte xx xe cole o oe e 
END; ETHSRNET SECOND LEVTL TEST PROGRAM-VSRSION 2. 


XR 
RA 


MSG DB "EXFCUTING ROARD COMMAND. Tu 
NMSG DR “COMMAND FAILED-FRROR CODE: S” 
NMSG1 DB “FOR INTERPRETATION OF ERROR CODFS-SER’ 
DB ASM LIE NG PILES” 
FMSG DB “ENTER TEXT (42 CHAR MAX) FOR MODULE’ 
DP * INTERFACE LOOPBACK TEST: 
DB ⁄“/ ” 
DE CDS TRINO WIT A GRAVE ACCENT=> `)$” 
FEMSG DR “ENTER TEXT(42 CHAR MAX) FOR INTERNAL” 
DE ” LOOPBACK TEST: 
DB 5 f | 
D? "(TND STRING WITH A GRAVE ACCENT=> `)5/ 
LMSG DR “TOE DATA TRANSFERRED 3Y MODULE” 
D3 ” INTERFACE LOOPBACZ 15:57 
LEMSG DB “TE? DATA TRANSTERRPD BY INTERNAL” 
D3 E LOCBRACK Ses" 
be e де AGE AE DE DOE ME RENERE RIE BE IIE AE AE NC TE NE EE AE PINE DIE DIE IE OK ES EO HE TRONS OS OE OIE IC OS OE RAE OE OK DE AE HE OK OE 
"ERROR CODES: (IN RESPONSE TO TRANSMISSION COMMAND 714110575): 
ፃ 
; LETTER NATURE OF FAILURE 
: S YOU ISSIJED AN INAPPROPRIATE COM 
; MODE TEE 30A3D IS IN. 
; T BOARD TIMER TIMED CUT-POSSIBLE 
: PROBLEM, 
; 
: JU TRANSMIT BUFFER SIZE FICESDSED:( 
: 7 FRAME SENT TO BOARD TOO SMALL:Í 
; X SXCESSIVE COLLISIONS 
ፃ 
; 





APPENDIX Y 


SOURCE CODE OF MAIN MODULE ETHERNET.PLI 


ETHERNST:/*MAIN MODULE-APPLICATION LAYER-ISO LEVEL 7*/ 


PROCEDURS OPTIONS (MAIN); 


DECLARZ 

/* LOCAL VARIABLES */ 
COUNT? FIXED PINARY(7),/*LOOP CONTROL VARIABLE*/ 
COUNT?A FIXED BEVAT 7) EO OP CONTROL*/ 
COUNT78 FIXED BINARY(7),/*LOOP CONTROL=/ 
COUNT7C FIXED BINARY(7),/*LCOP CONTROL*/ 
DSKNO CHARACTER(1),/FUSER INPUT DISK NUMBER*/ 
FRAMD CHARACTER(1),/*USER INPUT FRAME SIZE*/ 
SEC T CHARACTER(1),/*USER INPUT MODE SELECTION*/ 
/* GLOBAL VARIABLES */ 
ReGRIL FIXED BINARY(7) EXTERNAL, /*RECVD FILZ NO.*/ 
FRSIZE FIXED BINARYI(15) EXTERNAL,/*FRAME SIZE*/ 
VTERM FIXED BINARY(7) EXTERNAL, /*TERMINAL FLAG*/ 
TRMODE MORE INR?) EXTEQNAL,/*CMD MCDE FLAG*/ 
/* GLOBAL DATA STRUCTURES */ 
TXBUFT(1508) FIXED 3INARY (7) EXTERNAL,/FTRANS B3UFT*/ 
17 በ (1522) FIXED BINARY (7) (EXTERNAL, /FRECV BUFF*/ 
TXTBUF (128) FIXED BINARY(7) EXTERNAL, /*TEXT RUFF*/ 
1 RXFCB FXTFRNAL,/*R®CEIV® FILF CONTROL BLOCK*/ 

2 DISK FIXED BINARY(7), 

2 FNAME CESEACTER(8), 

2 PYYPT CEASACTVR (5), 

2 POR 24) FIXED BINARY(7), 
1 TXFCB EXTERNAL,/*TRANSMIT FILE CONTROL PLOCK*/ 

2 DISZ KIND FINARY (7), 

2 FNAM™ CHAFACTER(8), 

2 FTYP3 CEARACTER(3), 

N Deed 24) ED BINARY (7), 
/* EXTERNAL MODULES */ 
INIT ENTRY ,/* INITIALIZZS INTERRUPTS & NI3Ø1Ø*/ 
SENDATA ENTRY ,/* TRANSMIT ISO LEVEL 6 MODULE */ 
RECEIVE ENTRY;/* RECYIVE MODULE */ 

/*LAST RIVISION: 30/15/23-0922 ORIGINAL PROGRAM:27/29/823 */ 
/*AUTYOR: CAPT. MARK D. STOTZER-USMC-ATUGIS GROUP x / 


ከኤ MUYISCR: PROFESSOR UNO 2. KCDRES-COMP. SCIENCE */ 


PUT SKID LIST ( 7 RR A te eo EE OE AE pa e Ж NE OE OE OK OE SE EO EE OE HOE OE 
PUT SKIP LIST('ETHERNET CCMMUNICATION PZOGRAM-VERSION 5.87); 


o 
? 


Sl 





BIT SKIP LIST( 
BIT SKIP LIST(’ 


FOR 


“ALLOWS WEE CONNSCT. TO TEE 


ENTL-H=BACKSPACE TEXT ENTRIES: 


ms 


Wee 


2g 


PUT SKIP ESTI” BE IK HS HE AE RE HS AS IE AE NS IS AE HE EAE EN AE AE SE AE AE ጻ፡ 3፡ ፡፡ 3፡ ASK OR AS OK AS OK ME ASE AS AE ER 


BUT SKIP(2); 
RECFIL=47; 


COUNT7=1; 
PO WHILE 


(CCUNT721); 


COUNT7A=15 
DO WHILE(COUNT7A=1); 


PUT SXIP(2); 
EE RE MAT N MENU “RR ee ir 
PUT SKIP LIST( “WRITE RECEIVED FILES TO DISX NO:); 
RR SKTD LIST( DEFAULT DRIVE(A) ск 
BNIESKIP LIST('/DISK DRIVE A com 
BETOSKIP LIST('/DISK DRIVE B 2 85 it 
PUT SKIP BEST BRK AE HS TS NS THE OK SS e de > SK dee e KS i OE OS BE AE de ak RENE ENE RENEE 
oar SKIP LIST “ENDER DRIVE NUMBER==>"); 
GET LIST(DSKNO); 
PUT SKIP(2): 
IF DSKNO="1° THEN 
DO; 
RXFCB.DISK=0;/* LOAD DISK NUMBER IN FCB */ 
CONT A=2; 
END} 
ELSE 
ወጠ ደሸነገመ 2 ጥቪቫ፤ህ 
DO; 
ክን ከ ከቢ 1 /ጭ DISK NUMBER TO FCB */ 
COUNT 7 A=2; 
END; 
ELSE 
IT DSKNO="3" THEN 
DO; 
RXFCB.DISK=2;/* DISK NUMEER TO FCB */ 
COUNT? 1=2; 
END; 
ELS? 
PUT SKIP LIST( ’INYALID DRIVE NUMBER-REENTER:/) 
END:/*DO LOOP*/ 
DOUNT7B=1; 
Hor WHILE (COUNT?B=1); 
PUT SKIP ESE DE ED NEE FRAME DATA BLOCK SIZE”); 
ከ STE Satt 128 FOR ALL FILE OPERATIONS 
PUT SKIP мр VAX COMMUNICATIONS. Ss 
PARS SKIP LIST 128 BITES = 1%); 
PUT SKIP LIST( 256 BYTES = 2"); 
በዜ የ2 LIST(” 512 BYTES = 
Eeer " 1024 BYTES =A); 
ASE. LISTO 1500 BYTES O 
PUT SKIP LIST ( 7E REK RR MR ችፍ x< > 222 5፡ == 5= жж лоок дслс eR ^); 
PUT SKIP LIST( ENTER STLECTIOM==> ); 


O 
(o 


^ie 
19 


WX); 


? 


Jy 


)8, 





GET LIST(FRAMD); 
POT SKIP(2); 
Ir FRAMD="1 


y 
єз 
1 
taj 
= 


DO: 
FRSIZE=128;/* SET THE FRAME SIZE */ 
COUR IZ B=2 3 
END; 
ELSE 
IF FRAMD="2" THEN 
DO: 
FRSIZE=2565 /* SET FRAME SIZE */ 
CONT? B2; 
END; 
BLSE 
IF FRAMD="3" THEN 
Do 
FRSIZZ-512;/* SET FRAME SIZE */ 
CCUNT7222; 
END; 
ELSE 
IT FRAMD="4" THEN 
DO; 
FRSIZZ-1024;/* SET THE FRAME SIZE */ 
COUNT73=2; 
END; 
ELSE 
IF FRAMD="5" THEN 
DO; 
FRSIZE=1500;/* SET FRAME SIZE */ 
COUNT7B=2; 
END; 
ELST 


PUT SKIP LIST( “INCORRECT CEOICE-REENTER: 


ED /* DO LOOP */ 
WIERM=25S/* RESET TERMINAL FLAG TO FALSE 


TFMODE=0;/* RESET COMMAND MODE 


CALL INIT; 


BUT 
DUT 
BUT 
PUT 
DOT 
PUT 
BOT 
PUT 
POT 
GET 
PUT 


SME LIST “OPFRATING MODES: ’); 

SKIP LIST “ii eis N de de de de de de de de de oi ie ed ae aee me ee ie 
SKIP LIST( “RECEIVE WAIT LOOP = 
SKIP LIST(’TRANSMIT FILE OR MESSAG== 
SIT ISP VIRTUE TERMINAL OF VAX = 
SKIP LIST( VAX COMMAND MODE = 
sae bist ( DISCONNECT FROM NET = 
SKIP LIST ( “ER MR RR RE RR Rd RR MR ER N de Ed E 


SXIP LIST( “ENTER SELECTION ==>"); 
NESTES CER) 
SOS 


MESE LECT="1" TEEN /* ZECEITS MODE */ 


20; 
HET es LOAD vies” TESS DEST ADDR BYTES */ 


ES 


*/ 
FLAG TO FALSE */ 


S$ we we we we we ሠ 


ч; 


RR RR AE AAR RE l 


) 





TXBUFT(2)=7;/% FOR ACX REPLY IN RECEIVE MODE */ 
TXBUFF(3)=1; 
PUT SKIP LIST('IN RECEIVE WAIT LOCP-TO RETURN TO” 
PUT SKIP LISTE, MAIN MENU: ENTER <CR> ==>”); 
PUT SKIP LIST( HE AS HC ae e ee dee sie nic e d de de e SAE SE OK ae KE ae ate de de e 7 |. 
PUT SKIP(2); 
GALL RECITE; 

END; 


ELSE 
BESSEPSCT-'2' THEN /* NORMAL TRANSMIT */ 


CALL TRANS2 ; 
LSE 


IF BENMECT- 3' THEN /* VAX TERMINAL MODE */ 


DO; 
VTERM=1;/*% SET TET TERMINAL FLAG TO TRUE */ 
Meo | Z2=1 502; 
PUT SKIP LIST( “**x**&** TaX TERMINAL MODE **xeexxx* ^); 
PUT SKIP(1); 
PUT SKIP LIST(”VAX TERMINAL SERVICE:"); 
PUT SKIP LIST( “DATA BLOCK SIZE PER FRAME="); 
PUT LIST(FRSIZE); 
O ==-—— === === ——") 
PUT SXIP LIST TERMINAL ENTRY PY LINE OF TEXT’); 
PUT SKIP LIST( BEGIN ETER INITIAL V PROMPT: "V> ^); 
BUM SKIP BIST(*NTEFR: TEKT LINECCR»^); 
PUT SKIP LIST( “PROMPT WILL AUTOMATICALLY REAPPRA="); 
PUT SKIP LIST( “UPON ENTRY OF THE FI2ST CHARACTER’)? 
EES KP LIST( OF THE NEXT LINE YOU BEGIN. ‘); 
PUT SKIP LIST( ’~--------------------------------- er 
PUT SKI? LIST('/TO END TERMINAL SZSSION:^); 
ASIP LIST. ENTER: . <CR> AFTER Y» ^); 
PUT SKIP LIST(^/----------------------------------*); 
PUT SKIP 
TX BUFF ( 
TXBUFF( 
TXBUFF 


/* LOAD THE VAX NET ADDR INTO THE SIX*/ 
ADDRESS BITES x 


NN 
35 we 


l H ዘ ዘ ዘ || ዘ ዘ ኑ 
 ክኬክጨኑ።-3 Et AIM 


to «o MN) so en we we we we 


NE ET TWEE TY PS FIELD BYTss */ 


w w. df w aard tl ጐ›ጨፎፖም gt, 


BEE 
PUT SKIP LIST( a); 
DBESYEILE (COUNT7TC=1); 
CALL SENDATA; 
Pd SEEP LIST үз”); 
IF VTEZaM-2 THEN /*END TFPMINAL SESSION*/ 
DC; 
PUT SKIP LIST('**** ND TERMINAL SESSION exe 
po OO: 
END: 





ELSE 
DO; 
GATE Mn 
CALL RECEIVE; ` 
Fun ስ ከ1 H HR Hy^ ^); 
END; 
END; /* DO LOOP */ 
END; 
ES E 
IF SELECT='4" TEEN /* VAX COMMAND MODE */ 
DO; 
PUT SKIP LIST 
DUL SKIP LIST 
PUT SKIP LIST 
PUT SKIP LIST 


к VAX COMMAND DUSDSDOTPONS AE); | 
m... ie e; 
(“TO DOWNLOAD A FILE FROM THE VAX:); 

( JENTER THE MESSAGE: ar 

PUT SKIP HE FNAME(VAX).FTYPE(VAX)/XXX* 7); 

PUT SKIP LIST( ‘WHERE XXX - EXE FOR NON-TEXT FILES” JG 
DON SKIP LIST AND ሺፍ. ፒን TIT POR TEXT FILES ): 
PUT SKIP LIST( “FILS WILL TYEN BE IMMEDIATELY SENT’); 
PARAMS AT? LIST( “TO TEIS HOST.”); 

PUT SKIP LIST(” 2--------------------—------------- ЕЁ 
SEIP LIST TO UPLOAD À FILE TO TEE VAX:3"); 

DUT SKIP LIST(“1.) ENTER TIE MESSAGE: “); 

MOT SkIP LIST(^. GYNAME(VAXL.FTYPE(VAX)/XXX `“); 

PUT SXIP LIST( “TO OPEN A VAX FILE BY THE AROVE NAME”); 
RENE LIST( 2.) TEENS"); 

PUT SXIP LIST( 

BUT SKIP LIST( 

PUT SKIP LIST( 

PUT SKIP(1); 

TRMODES1; /*SET VAX CMD MODE FLAG TO TRUE*/ 
WASIZE=128; 

TXBUFF(1)=2f /*LOAD THE VAX NET ADDR INTC THE SIX */ 
/*ADDRESS BYTES */ 


END THE FILE TO THE VAX ADDRESS US 
HE NORMAL FILE SENDING SELECTIONS. 


eee a a «=> «=> => == ee oe "ШЫ ፡፡ == == Se => => ee r ee SD CO A y o Y <> ue 


` 
GANG 
` me 


uou 
ፃ 
ፃ 


JE 
WW 


e 
) 


m? 
/* LOAD THE TWO TYPE FIELD BYTES */ 


‚з ©з бо Fi dä Fi 
Aw -o ኮነ we we we ve 


A — — TI — 


VES [ዘ | u H Hl Hl 


CALL SEN 
GALL- INIT; 
RXBUFF(17)=255; 
CALL RECEIVE; 
END; 
ELSE 
i Eed 20 ?- 5” TEEN /* DISCONNECT BY SXITING TO CP/M */ 
OOPTE; 
ELSE 
PUT SXIP LIST(“INCOREECT OPMODE SELECTION-REENTER> “); 
END; /* DO LOOP */ 
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mr SEP LIST. DISCONNECTING FROM NET-RZTURNING TO C?/M.^); 
TRANS2: /* GETS USER INPUT CF FILE DATA */ 
PROCEDURE; 


DECLARE 
/* LOCAL VARIABLES */ 
COUNT6 EIXBD BINARY(7),/* LOOP CONTROL*/ 
COUNT6A FIXED BINARY(7),/* LOOP CONTROL*/ 
COUNT6B FIXED EINARY(7),/*LOOP CONTROL*/ 
COUNT6C FIXED P2INARY(7),/*LOOP CONTROL*/ 
SENDTYPS CHARACTER(1),/*USER INPUT TRANSMIT TYPE*/ 
FTYP CEARACTER(1),/*USER INPUT FILSTYPE*/ 
DRNO CHARACTER(1),/*USTR INPUT DRIVE NO.*/ 
/* FILE DATA ENTRY DCLS */ 
በመ! የ1. 
FN CHARACTER(22), 
LOWER CHARACTER(26) STATIC INITIAL 
(”abcdefehi jklmnovarstuvwxyz”), 
UPPER CHARACTER(26) STATIC INITIAL 
( A3CDEFGEIJKLMNOPQRSTUVWXYZ 0, 
/* GLOBAL VARIA3LES */ 
FILTY?P FIXED BINARY (7) EXTERNAL,/* FILE NATURS*/ 
FNOP FIXED BINARY (7) EXTERNAL,/*FILE NOT OPEN FLG*/ 
/* GLOBAL DATA STRUCTURES */ 
TXBUFF(1508) YIXZD BINARY(7) EXTERNAL,/*TRANS BUFF*/ 
1 TXFCR EXTERNAL, /*TRANSMIT FILE CONTROL 3LOCK*/ 
2 DISK FIXED BINART(?), 
2 FNAME CEAPACTER(8), 
2 rT eae CHAS SCTER(S), 
2 TFCR(24) FIXED BINARY(7), 
/* EXTERNAL MODULES */ 
SENDATA =ENTRY3/* ISO LEVEL 3 FRAME SENDER*/ 


COUNT6 =1; 
DO WEILS(COUNTE=1); 
PUT SKIP LIST( “TRANSMISSION OPTIONS: ” 
PUT SKIP LISTi¡ “SEND A MESSAGE = 17) 
BHEEISSXIP LIST(^SZND A DISK PILA = 2°) 
PUT SKIP LIST ( 35x e tote жс ж жк ж ск KOK BROS SSK FE OK BE HR NEAR AK XE ER AM) o 
ከአ ን |”: LIST( ENTER SSEECTION 2297); 
GET LIST(SENDTIPE); 
PUT SKIP(2); 
TYBSUFF(8)20;/* TYPE FI 
NUESSENDTYPE-'1'" THEN / 
DO; 
TIBUFF(7)=35/*T1PB FIELD BYTE 1=MESSAGE*/ 
CALL SENDATA; 
COUNTE=2; 
END; 


, 


) 
; 
d 
x 


YTE 2=NORMAL MSG OR FIL2E*/ 


ELD BYT 
“SEND A MESSAGE */ 
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ELSE 
IF SENDTYP5="2 
DO; 
Dam US TTPNMENISLD BYTE 1- FILE*/ 
CCUNT6A-1; 
DO CE BER CCOUNTOXX-1); 
BHETSSNMEPSUNSTUOONWITURE OF FILE TO S*ND:^); 
EWE РЕГ СТ TEIT (SSCII) FILE с 
ሺ ሇህ ስ ንስ EINE CODE (COM) FILE = 2°); 
PUT SKIP LIST (07 mate a ፍፍፍፍፍ ፍፍ =ፍ።ፍቸፍችፍፍችፍፍቸ*ፍች፡ ^) 3 
ከበቢ eM EA ED TYPE OF FILE CHOICE ==>“); 
GAN SP PYP); 
DAE SKIP(2); 


ፆ 


TEENE C END A DISK FILE*/ 


IF FTYP="1" TREN 
DO; 
ETNE SØTE PILETYP=TEAT FILE */ 
CCONTEA=2; 
END; 
ELSE 
IF FTYP="2" TEEN 
DO; 
FILTYP22;/* FILE TYPE=MACHINE FILE */ 
COUNTSA=25 
END; 
ELSE 


EOS Tae INGORREGT CHOIGE-RUENTER: b); 
END;/* DO LOOP */ 
COUNT6B=1; 
DO NEILP(COUNT6R=1): 
emner: 
DO @HUTILS(COUNT6C=1); 
РИТ EC A FILE TO SzND:'); 
PIS eS PERE LOCATED ON: )?፥ 
БОТ io ia ን ንንን ንካ የ = 10); 
БОТ ESTO Driven 2^); 
PRESTI LIST mote ane senge Ace xo); 
POT SKI STANDS DRIVE NUMBER==>"); 
COT LISTI DRNO):; 
PAS rp: 
IF DRNO= 1 THEN 


DO: 
TXFC3.DISKÉ-1; 
COUNTEC=25 

END; 

ELSE 
IF DRNO="2" THEN 

20; 
TX7CB.DISK=2; 
COUNTEC=2; 

END; 


Lelio 


(7) 
“ኣጎ 





PUT SXIP LIST(/INVALID DRIVE-REENTER 
END;/* DO LOOP */ S 
ПОТОК ОК ТОТ ENTER: CILENAME.FILETYPE ==>” 
CET LISTEN); 
PUT SKIP(2); 
FN= AS TEUN, UPPER, LOWER); 


I=INDEX(FN, ay 
IF 1=0 THEN 
DO; 


TXFCB.FNAME=FN; 
TXFÜR.FTYPE-" ^3 
END; 
ELSE 
DO; 
TXFCB.FNAME=SUBSTR(FN,1,I-1); 
MB DS =SUBS TA (AN, 1+1)+ 
END; 
TXFCB.TFCB(1)-20 
TXFCR.TFCB(4)=85 
TXFCB.TFCB(21)= 
CALL SENDATA; 
IF FNOP =1 TEEN 
COUNT62=23 
END;/* DO LOOP */ 
COUNT6=2; 
END; 
ELSE 
PUT SKIP LIST( “INCORRECT TRANSMIT MODE-REENTER: 7); 
ENDS /* DO LOOP */ 
END TRANS2; 


ki ን ቤኔ ከ LDS DAAT COUNT=0=/ 
SAUREN TERRTENTSRECORD ETC. “/ 
Øy 


END ETHERNET; /* ISO LAYER ? MODULZ */ 
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APPYNDIX I 
SOURCE CODE FOR MODULE SENDATA.PLI 


ANA: / PRESENTATION LATER MODULE-ISO LEVEL 6 */ 
PROCEDURE; 


DECLARE 
/* LOCAL VARIABLES */ 
COUNT5A FIXED BINARY(7),/*LOOP CONTROL*/ 
DEE SCHEN 1), /# DEST ADDSESS-USER INPUT*/ 
/* GLOBAL VARIABLES */ 
TRMODE FIXZD BINARY(7) EXTYRNAL,/*VAX CMD FLAG*/ 
VTERM FIXED BINARY(7) EXTERNAL,/*TERMINAL FLAG*/ 
FRSIZE FIXED BINARY(15) SEXTSENAL,/*FRAME SIZE*/ 
Zu GLOBAL DATA STRUCTUEES */ 
TXBUFF(1598) FIXED BINARY(7) EXTERNALS/*T7ANS BUFT*/ 


/*LAST REVISION: @9/15/83-@9¢2 ORIGINAL PROGRAM:37/29/83*/ 
SOR: CAPT. MARK D. STOTZER-USMC-AEGIS GROUP A 
EENNHSESIS ADVISCR: PROF. UNO R. KODRES-COMPUTER SCIENCE  */ 


NEES bt 1 THEN /* TERMINAL MODE */ 


DO; 
CALL SENDMSG; 
RETURN; 
END; 
IF TRMODE= 1 THEN /* TAX COMMAND MODE */ 
DO; 
CALL SENDMSG; 
RETURN; 
END; 
COUNTS4=1; 


DO WHILE (COUNTSA=1) ; 
PUT SKIP LIST( “ADDRESSES ON THIS NETWO? ' 
Por С5КТО? LIST( 29Ø-93-34: MDS SYSTEM = 
PUT SKIP LIST('00-04—-2A4: MDS SISTEM = 
PUT SKIP LIST( ’39-97-7FT: VAX 11/782 
PUT SKIP LIST (EER KERE KERE Sens = 
PUT SKIP LIST( ENTER SELECTION ==>"); 
GET LIST(DESTADDR); 
POT SKIP(2); 
BNUSPOU)z25; /*LOAD THE FIRST FOUR DEST ADDE BYTES*/ 
TXRUFF/(2)=7; 
Eu + 2; 
ENER OU KR. 4)= 55 


^ 
^ 
ፆ 


к) 
1 s 
DEM 
3°); 
XO XX «X ^); 





IF DESTADDR="1" THEN 
DC; 
IgE) 5,7508) LISTETWO DIST ADDR BYTES*/ 
TXBUFF(6)=234; 
ООШ 72) =Q TEEN/% SEND THE MSG*/ 
CALL SENDMSG; 
ELSE 
CALL SENDFILEs /*SEND THE FILE*/ 
COUNTSA=2; 


END; 
FLSE 
IP DESTADDR= ” 2”? TEXN 
Dor 
TXPUFF(5)=4;/*LCAD LAST TWO DESTINATON ADDR BYTES*/ 
MENT 6 )=1Ø; 
IF TXBUFF(7)=@ THEN 
CALL SENDMSG; 
ELSE 
BELL SENDPI LM; 
POUNT SA=2; 
END; 
ELSE 
ENEDESTADDn-'/3' THEN 
DO; 
TXBUFF(5)s7;/LOAD LAST TWO DEST ADDP 3YTES*/ 
TXBUFF(6)=127; 
TEMODE-2; 


IF TX3UFF(7)-0 TEEN 
CALL SENDMSG; 
ELSE 
CALL SENDFILE; 
CCUNTSA=2; 
END: 
ELSE 
ከ ከ ን LIST( INVALID NET ADDRESS SELECTED-RSENTSR: 7)? 


mes DO LOOP */ 


SENDMSG: /* MESSAGE SENDING MODUL? */ 


BROCEDURE; 


MECLARE /* LOCAL VARIABLES */ 


/* GLOBAL VARIABLES */ 

ከ ieee p SINSRY (15) EXTEPNAL, /*FRAME SIZE*/ 
TRMODE FIXED RBINARY(7) EXTEFNAL,/*VAX CMD FLAS*/ 
TTERM FIXED BINARY(7) EXTERNAL, /*TERMINAL FLAG*/ 
EED DR TA STRUCTURES */ 
TXBUFF(15€8) FIXED BINARY(7) EXTERNAL,/*TRANS BUF*/ 
RPXRUFF( 1522) FIXED BINARY(7) EXTERNAL,/*RECVY BUT? 
/* ZXTEENLL MODULES */ 

RS ENTRY, /* LOADS TSANS BUFFER FROM CONSOLE*/ 
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SENDFRAM ENTRY;/* ISO LEVEL 3 FRAME SENDER*/ 
IF VTERM-i TZEN /* VIRTUAL T*RMINAL MODE */ 
D e 


CALL FILBUF; 
IF TXBUFF(9)=96 THEN 
RETURN; 
IF TXBUFF(9)-46 & TX3UFF(190)-96 THEN /*END SESSION*/ 
VTERMsQ; /*END TERMINAL SESSION*/ 
ELSE 
CALL SENDFRAM; 
END; 
MLSE 
DO; 
ከ ከ ከከ ጋ LIST( MESSAGE SENDER: '); 
PUT SXIP LIST( “MAXIMUM NUMBER OF CEAFACTERS= ^); 
ET LIST(FRSIZE); 
PUT SKIP LIST(^ZNTYR MESSAGE APTER PROMPT: >’); 
mr SKIP LIST( “END MESSAGE WITH ACCENT: ` ^); 
ШИТ SKIP LIST( >“ °); 
CALL FILBUF: /*FILL TRANSMIT RUFFEP FROM CONSOLZ*/ 
CALL SENDFRAM; /* SEND THE MESSAGE */ 
END; 
END SENDMSG; 


SENDFILE: /* FILZ SENDING MODULE*/ 


PROCEDURES; 

DECLARE /* LOCAL VARIABLES */ 
COUNT4 FIXED PINART(7),/*LOOP CONTROL*/ 
/* GLOBAL VARIABLES */ 
ep YP EED BIMADY(GZ EES TERE, (SEILE NATURE 
FNOP FIXED BINARY(7) EXTERNAL, /*NOT OPEN FLAG*/ 
L?RM FIXED BINARY(7) EXTSRNAL,/*LAST DATA FLAG*/ 
/* GLOBAL DATA STRUCTURES */ 
TXRUFF(1508) FIXED BINARY(7) EXTERNAL, 
/* EXTERNAL MODULES */ 
VAXTXT ENT2Y,/* CP/M TO VAX FORMAT CONVERTER*/ 
TONDMA ENTRY ,/*TPANSMIT SET DMA ADDRESS*/ 
OPENDF ENTRY,/*OPEN DISZ FILE*/ 
POLSK ENTRY. /FREAD DISK FILE RECCAD*/ 
SENDFQAM ENTRY;/*ISC LEVEL 3 FRAME SENDER*/ 


/*LAST REVISION: Ø8/25/93-153Ø ORIGINAL PROGRAM:98/16/83 * 
/*AUTEOR: CAPT. MARK D. STOTZER-USMC-AZGIS GROUP + 
/*THESIS ADVISOZ: PROF. UNO R. ZODRES-COMPUTER SCIENCE ። 


MENU ET 15; /* LOAD TYPE FIELD BYTES*/ 
TX3UrF?(8)-0; 

Seon OF END; 

КО О 02-1) THEN /*FILE NOT ON DISK*/ 


fa! 





DO; 


ad SKIP LIST( FILE NOT ON DISK-REENTER DATA”); 
ENT SKIP(2); 
RETURN; 


END; 
IF TXBUFY(6)=127 & FILTYIP=1 THEN 


CALL VAXTAT;  /*VAX TEXT FILE FORMAT CONVYPTER*/ 


ELSE 
DO; 
CALL TRNDMA; /* SET DISK DMA ADDRESS*/ 
КОШОК Р LIST('*-* FILE TRANSFER BEGINS eee”) | 
RR SKIP(2); 
COUNT4=1; 
DO WHILE(COUNT4=1); 
BELL PDISK; /*PRAD A DISK FILs RECORD*/ 
IF LFRM =1 THEN 
DO: 
CALL SENDFE^M; 
TXBUFF(8)=1;/*ENCODE TYPE FLD=INTERMED FRAMZ*/ 
END; 
ELSE 
COUNT 4-2; 
BED, /* DO LOOP */ 
TIBUFF(2)=2557/*ENCODE TYPE FIXLD=LAST FRAME*/ 
CALL SENDERAM, 
ar SKIP LIST('w*** PILS TRANSFER ENDS Ewei: 
eee SKIP \2)$ 
RETURN; 
END; 


END SENDFILES 


END SENDATA; /* ISO LAYST 6 TRANSMIT MODULE */ 
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APP*NDIX J 
SCURCENCODETECR MODULE RUGDATA. PLI 


MODAN: / ISO LAYER 6 RECEIVE MODULE */ 
PROCEDURE; 


DECLARE /* GLOBAL DATA STRUCTURES */ 
RXBUPF(1522) FIXED BIVARY(7) EXTERNALG/*RCV 3UFT*/ 


/*LAST REVISION: 29/15/83-1215 CRISGIN3L PEOGRAM:28/17/88 */ 
ZSNUPEOR: CAPT MARK D. STOTZER-USMC-AZGIS GROUP x / 
ISNHESIS ADVISOR: PROF. UNO R. KODRES-COMPUTER SCIENCE */ 


IF RXBUFF(17)= 9 THEN /* MESSAGE FRAME */ 
CALL CONMSG; 
BES 
IF PXBUFF(17)= 15 THEN /* FILE FRAME */ 
OML FILER; 
ELSE 
PUT SKIP LIST(’2ECEIVED IMPROPERLY ?NCODED FRAME”); 


CONMSG: /* MESSAGE RECEIPT MODULE */ 
PROCEDURE; 


DECLARE EE VARIABLES */ 
TRMODE FIXED BINARY(7) EXTERNAL,/*VAX CMD FLAG*/ 
FRSIZE FIXED RINARY(15) EXTURNAL,/*FRAME SIZE*"/ 
VTERM FIXED BINARY(7) EXTERNSL,/*TERMINAL FLAG*/ 
/“ GLOBAL DATA STRUCTURES */ 
RXZUFF (1522) FIXED BINA2Y (7?) EXTEZNAL,/*2*CV BUF*/ 
/* EXTERNAL MODULES */ 
TRMSG ENTRY /% ACCNOVWLEDGE SENDER=*/ 
EMTRUF ZNTRY;/*DUMPS RECFIVE BUFFER TO CONSOLE*/ 


IF VTERM =1 TEEN /* NOT IN VI2TUAL TERMINAL MODE*/ 
pa 
PUT SKIP LIST( cs RECTIVED MZSSAGE 15: )1 
AUS ATP (e): 
IND? 
CALL EMTBUF; /* DUMP THE RECVD FRAM2 DATA TO CONSOLS */ 
CALL ™RMSG; /* SEND THE ACK FRAME */ 
IF VIEEM =1 THEN /*NOT IN TERMINAL MODE*/ 


?5 





DO; 
PUT 
RUT 
PUT 
PUT 
PUT 
PUT 
END; 
BLSE 
IF 8X3UFF(18) 
PUT SKIP L 
END CONMSG; 


SKIP(2); 
Sele PST 
TEES 
SEP EST. E 
Shel = EISE > 
SKIP(2 


AC 


DE MEAT BE RNA 


= 15 T 
IS T 


“KERKE END OF 


K D WAIT 


MESSAGERTEXT. ); 


LOOP_ENTER<CR> TO TX 
rake ge eg e oe te oe te e oleo REIK SKE DK E IK IK IR K 


nr 
GET xx ^); 


e jee The OR TTERMINAL REPLY*/ 
МЛ 


ШОО FILE FEAMS RECEIPT MODULE*/ 

PROCEDUPE; 

DECLARE ZS GLOBAL VARIABLES */ 
TRMODE FIXED BINARY(7} SXTERNAL,/*CMD FLAG “/ 
RECFIL FIXED BINARY.7) SXTES2NAL,/*RFILE NO.*/ 
NEEM RIM MIXED BINARY 7) EXTERNAL, /*TESM FLAG*/ 
As GLOBAL DATA STRUCTURES */ 


1 RXFC3 EXTERNAL, /*“RECTIVE 


pi Sk ሮቦ RINARY(7), 
2 FNAME CZARACTER(S), 
ОЕТ PETC A ለስን 2). 


FILE CONTROL BLOCK*/ 


pes (ce) FINED BINARY(7), 
DIMUS D522)9RFXSD PINARY(7) SXTERNAL,/*RX BUF*/ 


ZS VXTSRNAL MODULES 
RCVDMA 
DELEDF 
MAZEDF 
WEDISK 
TRMSG 

CLOSDF 


EH 
INDI SSIS ICRI 
VNTRI,/T*OELSTES FI 
ENTZ2Y,/*MAKES NEW 
PNTEY,/*WRITES A 
NI O АСК 
ENTRY;/*CLOSES DIS 


NET RCVDMA; 
IT RXBUFF(12)=Q THEN 
Do; 

PUT SKIP LIST( rar 
PUT SKIP LIST{ ’ OPEN 
PUT SEIP(2); 
3XFC3.FNAMEZ/PECFROM 
3XFC3.7TYP9?-/^NET: 
RR TECE(1)=4; 
RXPCB.TFCB(4)=9; 
PC. TECR(21)=0; 
GAEL DE LEDF; EE, EEN 
САМ MAKEDY; /*CREATE A NEW ONS 


CALL WRDISE; 


re FILO PEC 
INS FILE- 


” 


/* NAME 


° 
? 


?& 


/ FII runan" 


CHE 
LEST/ 
DISK FILES*/ 


ጋ ከ OR D+ 


FRAMES*/ 
E SILES*/ 


#/ 
EIPT BEGINS rar); 
REGE LOM ЧТ); 


THE RECEIVED FILE*/ 


/ “7 RO TERAE FIELDS OF FC3*/ 


TES XN. XT*/ 


See 
e ET EN RECORDÍIZE BITSS) 


DR), 





Séi) TRMSG; /* SEND THE FIRST ACK FRAME */ 
ND; 
ENLS E 
IF RXBUFF(18)=1 THEN /*INTERMEDIATE FILE FRAME*/ 
DO; 
CALL WRDISK; /*WRITE NEXT RECORD TO DISK*/ 
SEL TRMSG;  /* SAND TEE ACKX BRAME */ 
END; 
ROSE 
IF RXBUFF(18)2255 THEN /*LAST(DUMMY) FILE FRAME*/ 
DO; 
BEALI CLOSDF; /*CL OSF TRE DISK FILE*/ 
PUT SKIP LIST( "sik END FILE RECEIPT EE, 
BI SKIP LIST’ SEE PILE(S):RECFROM .NzT'/): 
ENEESURTP(2); 
CALL TRMSG; /*SEND THE LAST ACK */ 
BUT SXIP LIST(^ NOT; 
PUT SKIP LIST('-------------------------2---2-------- © 
ENUMSCIP LIST(^IF RECRIVED'FILE IS à TEXT FILE 25 
PUT SKIP LIST('THE VAX THEN REFORVMAT USING: ’); 
PUT SXIP LIST(’ PIP FNAME.FTYPE=RECFROM_ NEE (Dae) 7; 
PUT SKIP ES = FNAME.FTYP® IS YOUR CHOICE’) 
AUT SKIP LIST(” 
PUT SKIP(2); 
IF VTERM=1 TREN 
DO; 
PUPR ENG AE TERMINAL MODE”); 
ET በ2 የርስ! VS) 
BND; 
ELS 


UJ te] 


0; 
PUT SKIP LIST(°IN WAIT LOOP-ENTER<CR> TO EXIT"); 
PUP SXID LIST( Fr Xc Y RO e e me me e me e a DS 
POT SEIP(2); 
IND; 

BEND; 
ELSE 

Skape LIST,” FRAME TYPE FIELD BYTE 2 INVALID CODE’); 
END PILER; 


END RECDATA; /* I 


Ua 
O 
CH 
Le 
Fa 
txj 
13 
OD 
1; 
tz] 
ርጋ 
(La) 
dA 
< 
A 
OG 
O 
UJ 
Gi 
t+ 
tri 
3 
le 
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APPENDIX K 


SOU CHODE О Ор PARA ASM 


pee же док жж BE AE AE OK NEE Re OK A AK aK ee DEE ore 
Be HE BE NC HE RENE RE Ne ME ж ож экс HE de e dee ee ee EE OR Ae CE e ee e e ojo x x x xt e ae a e e e ae ape he 

e 
ከ ስከ) 4 NAME: STHERZ.ASM 

ቪጢ ው ንህ] PERFORMS TEE ISO LATER 2 AND ó FUNCTIONS IN 


ENEE AND RECEIVE AND PROVIDES TSE ISO LAYSR 7 
RECEIVE MODULE 


2090 DO we Be we 


DO oo ጣዊ ወፄ We we we we we We Be we Oo DO DO AO SO ee 


Ae LIGATION LAYER(LAYER 7) :IN RECEIVE ONLY- WAIT 
FOR FRAME ARRIVAL. 


LOOP 


MEMORK LAYBR(LAYER S):T8ANSMIT CR RECZIVE FRAMES 
DATA LINK LAYEZR(LAYER 2):PROCESSES ACKNOWLEDGE FRAME 
ADDITION TO TEE LATSR 2 PUNGZIONS PERFORMZD BY TH 
ር ከ). 


ማዓ 
ы 


NISØ1Ø CONTPOLL 


TSIS MODULE ALSO ALLOWS ALL OTHER MODULES TO ACCESS 
BHE CP/M-BÜQ OPESRTING SYSTEM FUNCTIONS SEOWN BELOW 


LAST REVISION: 29/16/85-10900 ORIGINAL PROGRAM: 28/14/23 
A: CAPT MARK D. STOTZSR-USMC-ASGIS MODZLING GROUP 
መጠ የ ADVISOR: PROFESSCR UNO Å. KODZES-COMPUTER SCIENCE 
ate EAE sk rte si cte sete de e fe ete oie de e je be fe ae e ae ae fe nte ale e e e aaa ee Ga OR IC OO Ae ae HE xe ote a OO OR OK 

PUBLIC MIT, SISROUTINES AVAILABLS TO EXTERNAL MODULES: 

EL IC RECEIVE 

BUELIC FILBUF 

ን) 11. EETSUN 

PUBLIC NULEUF 

PUELIC AWAIT 

EURLIC TRMSG 

EUSLIC NRDISK 

BIEL IC WA 

PUBLIC SSNDFRAM 

PUBLIC DESK 

EURLIC OGENDE 

PUBLIC DELEDF 

EUBLIC Ke Dh 

፲ LIC CLOSDF 

PUELIC RCYDMA; MODULES CALLED BY THIS MODULE 





PUBLIC TRNDMA 
EXTAN RECDATA 
> NIS019 BOARD REGISTER PORT ADDRESSES: 


C REG BOU 2JØB2H; COMMAND REGISTER 

SREG QU ØØBLE; COMMAND STATUS REGISTER 

ISREG EQU QCRSHs INTERRUPT STATUS REGISTER 

TEREG EQU 003885; INTERRUPT ENABLE REGISTER 

EBAR SOU @QB9H; EXTENDED BASE ADDRESS REGISTER 
H3AR EQU ØØBAH; HIGH BASE ADDRESS REGISTER 

LBAR Dal ØØ33E; LOW BASE ADDRESS REGISTER 

EBREG EQU QUSCH, ЕЕ SITE COUNT RESISTE 

LAPEG EQU 0058D0H*: LOW BIT3 CCUNT REGISTER 

MNAE NAM BOOT ENTRY FOINT: 

EXIT ed 90028; WARM BOCT-TERMINAL ERROR ESCAPS 
s BDOS EQUATES: 

BDOS QU QOH i BDOS ENTRY POINT 

MODOS FUNCTION CODES: 

CONSIN ECU KEENT 

CONSOUT OU HZH: CONSOLE CHARACTER OUTPUT 

BEING EOU Z9H; PFINT STRING 

CONSTAT EQU CBH, CHECK CONSOLE STATUS 

OPENFIL  EQU OFH: OPEN A DISK FILE 

CLOSEF EQU ገፆን ከ የነ ን A DISK FULE 

DELETE ECU 13H: DELETE A DISK FILE 

READF EQU l T ADEM OI Sa! LB RNCORD=SMaãs BYTES 
me Li EF EQU s S TER E D E 25756 
MAKFF QU Led, CREATES A NEW DISK FILE 

Meo QU LAH; mo 1 ንው ስያ ፓን ከብ... 

DR TR Be NE SHE BK TS OK AS SS AE RE AK AK AS AS HE NS AE EE AE e et e AR NE EE AE OE SIS OES EK AE AR OK BENS HE AE SIE AS HE OE SS SOE I EE == > > 
pem e ae SE coit Ж sje gå fe ste ste ic le ele sleale de fe decke ee e dr ebe eer de dech etes toe ahs ae aye kk 2k a 
ጢን. ፦ INITIALIZSS INTERRUPT VEG TORDEN 2 EEGISIERO: 
INT DI 

IN SREG; READ STATUS REGISTER TO CLEAR 
MVI A,@3FH; CLEAR NISØlLØ RECEIVE BUFFER 
QUT GREG 

CALL ROAD 

MV I Del ስስ ፣ aU Pi CONTROL 

OUT CEDE 

MVI m OOR 

OUT ZFCH 

Gil A,ØDFY, ENABLE INTS ONLY 

OUT ØFGH 

MVI A,2C5H 

SEA DOZEH 

LXI T,RECFRAM 

SHLD 0298 

LXI HAGE 

MVI ASGERH,; PRELOAD ACKNOWLEDGS EUFFER 
MOV M, 

EI (RCA, EMAMBLS RECSIVSCIDA) INTERRUPT 


ገ 





MV I Av 241 

MOV NS 

CUT FET EG 

ONI A,09E; NIS019 ONLINE COMMAND 
OUT CREG 

CALL READ 

EL 

RET 


RR ARO Re a o x x ate te e КК e mete KE E s aK zi oe otc ok ote oi i sic o oic ote oc ote oi scole xc oe ste zie e ee ee ee E 
See e te e e e ae e e sc eX se o ic ae ice o est ste toe ole e ee deele e ee ee dee ee e ee e eier e 
S AECEIVE:ISO LAYER 7-WAIT LOCP FOR INCOMING FRAMES: 


EEUSTYE ZI 
WAITLP NOP 


NOP 
ЧОР 
NOP 
NOP 
DI 
LXI Ee, PRAMIN 
MOV dag 
CPI oie RAS А EHAMPOAEURT VEDT 
JNZ NOTYET 
CALL RECDATA 
MI A,70E; RESET FRAME ARRIVAL FLAG 
STA FRAMIN 
NOTTET EMI CE CONSTAT 
CALL EDOS 
CEI 20H 
RNZ 
EI 
JM? WAITLP 


a a oe a xot ste sente te sott ote e ale siete ote o sc ze soot ae eae e e ek ke je ae aa EG ag IK AK HERE eee 
sj s te se e zie ade E HERE аск e e e e ae ae a le x o oi otc OR e e HE A e ae e ae a e ape e eg nese 
SSCPAAM-PERFORMS ISC LEVEL 3 FUNCTION IN THE RECEIVE 
Du RGT VES FRAMES AND TRANSESES THEM TO MEMORT. 
FANDLES ALL NIS@12 INTERRUPTS AND ENABLES. 


ep ee 


ECFRAM DI 
ESE 
DIVIDE 
PUSH 
PUSA 
DAI 
MOT 
I 
LXI 
MOV 
QUE 
MOT 


VP 


cn 
= 


tr] 
ጋን 
Li 
«a 


tia 
"Op 
te 


GRS PENN INTERRUPTS 


Ud ' HE Ar io fid id UO ዚህ "d 
tz] 
ናን 


e e [x]. + - e e 


E Klee € C) 


H> 
Id 


T9 





RDD 


FREER 


CMP 
JZ 
MAT 
CMP 
JZ 
JMP 
MVI 
OUT 
LAI 
MOV 
OUT 
MOV 
CUT 
LALD 
LXI 
DAD 
MOV 
QUT 
MOV 
OUT 
LXI 
MVI 
MOV 
OUT 
JMP 
LXI 
MOV 
CEI 
JNZ 
MVI 
STA 
LXI 
MOV 
CPI 
JNZ 
LXI 
MOY 
CPI 
58, 8 
MVI 
STA 
JMP 
DI 
LXI 
MVI 
MOV 
CUT 
LXI 
CALL 
LXI 
CALL 


B 

REA; RECEIVE FRAME INT WAS ENABLED 
BØE 

B 


RDD; RECEIVE DMA INT WAS ENABLED 
ppe IE ANOLE DMA INT WAS SNABLED 
А OCH 

EBAR 

H,RBUFFT: TOP OF RECEIVE BUFFER 
AE 

HBA? 

E 

LBAR 

FRSIZE 

Da0916E6eeDD 22 To IT 

D 

M 

HBREG 

AL 

LBREG 

፪፻ CET VG 

A Ø7E, SST INT ENABLE TO ADD 

a 

FINI 

NR TOP OF RECEIVE BUEFER 
A,M 

303; TESTS FOR GOOD FRAME 
FRERB; BAD RECVD FRAME 

A,911;5 SET FRAME ARRIVED FLAG 
FRAMIN 

H,ATYPEI, TEST FOR PECYD ACK FRAME 
à ብ 

224 

EDD2 

Sins ae 

A,M 

OFFE 

RDD2 

A,912 

ACK: ACK FRAME RECVD 

RDD2 


DISABLE BOARD INTERRUPTS 
ieee. OG 
11111 
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RDD2 


FINI 


>< > >K >£ >< SE 


ado ate alo a'o 
2 > > >é 


JMP 
LXI 
MVI 
MOV 
OUT 
BOP 
POR 
PUE 
MVI 
OUT 
РОР 
EI 

RET 


EXIT; ESCAPE TO CPM 

H,CEREG 

A,94H 

ከፄ INT ENABLE STO RBA 


Mera, nLSTORE INT PRIORITY 


K EAS AS AE AR AE SE OE AS RS OK AS AE AS BH AS HS EAE HE AE SE AS AS AS IE AS AE EK Bs NE BE AE AS AE AE AS SE OS AE OK OK 2 > 


oa SK aK ote ot ceto dd к Ас ЖЕ ЖОКЕ: nte ste xc xc oco o tote xi ote sit oc ote joe xj ote xc og oto AK E K ote ode si ooo ote tt toe se 
FILBUF-PLACES CONSOLE INPUT MESSAGES INTO TRANSMIT BUFFER 


, 
FILBUP 


MSGLP 


RDCP 


LALD 
XCHG 
PUSH 
LXI 
PUSH 
MVI 
CALL 
ROP 
POP 
CPI 
JNZ 
PUSH 
LXI 
MOV 
CEI 
JZ 
EK 
MOV 
INX 
MVI 
MOV 
PUSH 
PUSH 
"VI 
MOV 
CALL 
Poe 
РО? 
ЧИР 
CPI 
JZ 
CPI 
JZ 
MOV 


FRSIZE, LOAD COUNT=FRAME SIZE 


IF 


A,TFDATA, LOAD ADDR =TRANSMIT DATA TOP 


= 


C,CONSIN;s INPUT CONSOLE CHAR. 


ØDE MAS CARRIAGE RETURN INPUT? 


DN 

H,VT*SRM; IN TERMINAL MODE? 

A,M 

d1H | 
VTEND, TEEN THIS IS END OF MSG. 


H 
Mees sek; LHe Cash. 


NS 


"AH; ADD A LINE 


' FEED 
STORE TRE LINETEE 


D TOO 


= o 
ኤሙ 
ጋ 


ONSOUT; OUTPUT IT TC CONSOLE 


Or CH 
сл 


[5311 !፲7 ndr 
ide œ 


ADCON; CONTINUE TO READ TE 
GOGH; BACKS PACE=E=CNTL~-H 
BACKSP 

62H; GRAVE ACCENT="=END OF MESSAGE 
SØN I 

mn ST Wee et Ki 


t+) 


BUFFER 


EG 





VTEND 


RDCON 


BACKSP 


SENT 


SENFIN 


o ERIN EAE 
BRIEAUF-DUMPS RECEIVE BUFFER TO CONSOLE: 


vo we 909 we 


SMIT DUR 


CCNLP 


DCX 
MOV 
ORA 
JNZ 
PUSH 
LXI 
CALL 
BIO P 
MVI 
JMP 
PUSH 
INX 
BOSH 
JM? 
INX 
USI 
DCX 
POSE 
JMP 
MOV 
PUSE 
Lil 
MOV 
CEI 
JZ 
"on 
MVI 
MOV 
CALL 
RET 
HOP 
CALL 
RET 


eee de se ma si 


LRLD 
ACES 
USE 
LXI 
ml 
MOV 
PUSE 
CALL 
HOP 
POP 
DCX 
MOV 
ОРА 
JZ 


ate Sto ate ale 
^^ тт > 


Ds DECREMENT TEE CODNTER 
A,D 


3 


RDCON; IF CTR NOT ZERO THEN CONTINUE READ 
H 

D, LONGMSG+ERROR ASG TOO MANY INPUT CHAR. 
TATOUT 

45 TERMINAL MSG IN BUFTER-DONE 

À ,60H 

SENT 

Ds CONTINUE BRANCH 


MSGLP; GET ANOTHER CHAR 


id int СО rm» ጣባ 


MSGLP; GET ANOTHER CEA? 

AA STORE Tas CEAR 

H 

D,DADDF: LAST ADDR EYTE 
AM 

OVFHs IS VAX =DESTINATION? 
SENFIN 

E 

А,бдН 

M,4; SOTRE A NULL IN PLACE OF ACCENT 
SCLIN 


KOLN 
A UN CR DE ACAO DER E NC AS De REA CIA ASAS NONE AS Ae DR De ES 
SE 5፡፡ፎ 3፡ ፡ TIRO ЫЫЫ >Z Z > XZ >Z >€ >€ > >< Xx >< SE EE LG 


FRSIZE 


ADATAT; TOP OF RECEIVE BUFFER 
CONSCUT; CHAR TO CONSOLE 
M 


a * * 


ad is LI IM ty dood 
- CJ E 
UJ O 
un 


SG DON IF COWNT=RRAME SIZESDONE 


CH 





MSGDONE 


PUSH 


INX 
JMP 
CALL 
CALL 
RET 


D 

H 
CONL? 
FOLN 


ZOLN 


"Sie et S IE REK FE SE A IE A DIS E MR AE RE A GE AE M IR E SK NE IK ER EOE AE ES OE AE IE AE OK OE OS E >£ NE OE OES SE OE OE OEE 


y ROS 


ELEK: 


ode ole skr 
Sat per 


з RE HE NE EAE AK MC AE A EE OC AE OK OIE EE AE SE Xt >£ >= > 


>K >& AE EE >< >£ x< >€ z€ >£ 


fee ek CONVERTS CPM FORMAT TEXT FILES TO VAX FORMAT: 


, 
VAXTAT 


READREC 


RDLPA 


CALL 
MVI 
LXI 
CALL 
CRI 
JZ 
MVI 
LXI 
CALL 
LXI 
CALL 
CALL 
LXI 
PUSH 
LXI 
PUSH 
MVI 
MUSE 
CALL 
MVI 
LXI 
CALL 
CET 
JNZ 
POP 
per 
PO 
INR 
MOV 
DPI 
JZ 
EO 
CPI 
JZ 
CPI 
JZ 
OGG 
MOV 
XCHG 
INI 
INR 


VOLN 

C,CPENFIL; OPEN THE DISK FILE 
D,rCBIN 

BDOS 

DRFB, TUST IE OPEN SUCCESSFUL 
FERRI 

CPS DMA: SET THY DISK DMA ADDRESS 
DOTA TICE 

BDOS 

Di AE E | 

PINOUT 

Beh 

ШОО ህር OP TEXT BUFFER 

H 
D,IFDATA; 
D 

RE, BEE Ep 
n 


АШЫШ ጤመ ከ ከ ብጋ). DATA BYTE 


NULBU*; FILL TRANSMIT 3UFFER WITH 04 HEX 
C,READF; READ A DISK FILE RECOZD=128 BYTES 
D,FCBIN 

BDOS 

cto THIS LAST RECORD? 

SN DRD 


INCREMZNT COUNTER 


€) > ty rq YU ty 


eMas PES ES SITE TAIS RECORD 
CRA, GETSANDOTEBEERSCOTD 





JE IP2 


SKIPS 


HEAD? 


ENDRD 


FERRI 


“መህ 99 . wo o we 


жжжжж 
Í. LEVEL 3 TRANSMIT FUNCTION-SENDFRAM: 


PUSE E 

PUSH D 

PUSH 3 

JMP A 

INX ጋ ዜ DPITERECONT THEN SEND THE FRAME 
PUSE R 

DAI HR 

PUSE D 

PUSE B 

GALL SENDFRAM; SEND IT 

CPLL NUL3UT; NULL THE BUFFER AGAIN 

MVI "oa SET TYPE EIELD-INPSEMED FRAME 
STA TIPP 

JMP DOI RIAD NEXT BIT: AFTER SKIP CRET 
INX H; I? LINEFEED THEN SKIP AND READ MORE 

PUSH H 

PUSH D 

PUSE B 

МР SDA 

LXI НП ОТТОР IE GER 12e TEEN GET RECORD 
PUSH E 

TNX D 

PUSH D 

MVI pA Od 

RU SZ R 

JMP READREC GET THE NEXT RECORD 

MVI A, OFFI 

STA DI PD 

POP B 

POP D 

POP H 

CALL SENDFRAM 

LXI De oc, 

GALL TAPOUT 

ET s DONE 

PSI D ERMSGs ERROR MSG-FILE NOT OPEN 

GAEL ТАТОПТ 

T 

xk aie ke еж се желе ек otc cic cte oie otc oie oie ole zx e cle nic clesie te sie sje oie sic olt siente ae ote e zi zie cle cte cic ose este oe ci ote 
cc sete ste texte e ን a sie ake HE cale te ale ote de He He de Die He De He De Me le teo oie ote ig oe os oe kg ak ake ok oF 


SENDFRAM DI 


LOCP1 


LXI 
MCV 
CPI 
JZ 
CPI 
JZ 


BEE SS EN DS FRAMES ON THE ETHERNET: 


H,CEREG; LOOP UNTIL ZNABLE REG- 2 OR 4 





GO 


GO1 


COMP 


ICON 


EI 
JMP 
DIT 
LXI 
MOV 
CPI 
JZ 
CPI 
JZ 
DI 
JMP 
MVI 
LXI 
MOV 
OUT 
ET 
MV I 
OUT 
LXI 
MOV 
OUT 
MOV 
OUT 
LHLD 
LXI 
DAD 
MOV 
OUT 
MOV 
OUT 
DI 
MVI 
LXI 
MOV 
OUT 
5:1 
SLT 
OAI 
MOV 
CRI 
JZ 
DI 
LXI 
MOV 
CPI 
JZ 
LXI 
CALL 
EI 
MVI 
DI 


LOOP1, KEEP CHECKING 


H,CEREG 
8 
023 
GOL 
Q4H 
GO1 


LCOP1; IF CHANGED GO BACK TO LOOP 
A,O0E 

EA C5REG, DISABLE NI301@ INTERRUPTS 
M,A 

ТҮП: 


A,@@H; LOAD TRANSMIT ADDR/BYTE COUNT 
EBER 

dj PaUFET; TOP OF TRANSMIT 3U*TE3 
ALS 

HBAR 

E 

LBAR 

FRSIZE; SET TRANSMIT FRAME SIZE 
D,2008H; ADD 2 TO IT 

D 

А,Н 

HEREG 

A,L 

L3REG 


A,Q06HR 
El ende, VNARPSOPRANSMITUPDD) INTER2UPT 


MALT TOR TIE INTERRUPT 
EG 
A, 
06H, MAS TDD INT SRRUPT ARRIVED? 
COM 


BE ARE RM 

E 

014, VIRTUAL TERMINAL MOLE? 
VTCON 

DSG 

qo PT 


EE LOAD OT3ANSMIT AND SEND CMD. 





OUT C REG 


CALL ERREAL 

LXI ከ SETOACX TO SENT 

MVI A,Ø04 

MOV M,A 

51 

CALL AWAIT; WAIT FOR ACKNOWLEDGES FRAME 
RET 


O NE E A E E E A DE SK SE XK AE AE AK AS AE AK AE AE HE IIE AE AK IK RE RE RENE NE RE NE DE ENT NS IE ЖК ЖоК AR REA RE SE NE AK AE AE RE K 


g DIR DER NR De DS RE DR TR AR BEE AE KE N ЖЕКЕ XK AE BEE HE EE SE THE AE I DIE NT NS EE IE NT N ER EE MOE DLE IE EE ME DE 


RR ER 
s ISO LEVEL 2 ROUTINES: AWAIT(TRANSMIT) AND TRMSG(RECEIVE 


AM 
KA 
ደወ ው 
x 


E): 


EE EE oye she ope еж ж ie ae e NC e e ate ie ie E SE SE SE Se AE Кок зе эс кезк К: e ape je oe ae je ae e e ae e fe ls a e 
AWAIT-WAITS FOR RETURN OF ACKNOWLEDGE FRAMES: 
9 
AWAIT LXI DECOOONHI;SWIBST TDMES LOOP COUNTER 
an LP LXI B ,@FTPPH; INNER LOOP 
TRNL?1 LXI HUA CK 
MO Y A,M 
CPI 01H; RECEIVED ACK YET? 
J2 3ACX 
DCX B 
MOV NAS 
ORA B 
RE FA EP 
DCX D 
MOV ሷ,ቿ 
ОВА D 
JNZ TRNLP 
LXI D,TIMMSG; TIMED OUT-ABORT 
CILE DOLSUT 
IXI D,TERRMSG 
CALL TXTOUT 
JMP E 
БАСК MVI A,DFF3; RESET ACK FLAG 
SPA АСК 
MVI A,D00H5 RESTT FRAME ARRIVAL “LAG 
STA FRAMIN 
ጋ ፔጥ 
O de NR de de Re MERE SR ፍች ፍፍ sexe t ck sie ot pe e e ae Mee ER ie de HE ee de Ne ae oie de de Ne de de di AE EE de de He He de 


EMSC- SENDS ACENOWLEDGE FRAMES IN RECEIVE MODE: 


TRMSG MVI C,Ø34, CTR=3 


LXI ን ADD 

LXI pan) 
LO9P2 MOV А,М 

XC EG 

MOV M,A 

XC SG 

DCR C 

JZ LOCONT 
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INX H 


INX D 

JMP hoes 
LDCONT MVI ee RESET INIEREUST PRIORITY 

CUT ¿YDE 

SC A ,0€H 

OUT EBAR 

LXI eer DER E 

MOV Re, a 

OUT HRAR 

MOT А,Ь 

OUT LBAR 

LELD PRSIZE 

LAI ሀ ,2ሠፀ5፪ 

DAD D 

MOV Am 

QUT HBREG 

MOY A ,L 

OUT LBREG 

MICI Bas LOAD TYPE FPIFLD=ACK FRAME 

STA Түр] 

MVI A,OFFH: ACK FRAME 

STA ከ" የየ. 

MVI A,06H$ ENABLE TDD INTERRUPT 

LXI B,CEREG 

MOV Por 

OUT LIES EG 

I 

SET et $ ORA NERI 
DONE LXI H ,CEREG 

MOV A,M 

GE 96H; TRANSMIT DMA DONE? 

ህሪ DONE 

DI 

MV I A,229H; LOAD TRANSMIT AND SEND COMMAND 

OUT CREG 

CALL TPREAD 

RET 
"e zie xe o alc oeste KESK HE E AE IK K E e жокк ж Жжж еж жок жок деде Жк dee e RE e e e ae e e te OK OR FE 
; жже жокк жк te ea ae e ae a E-E E EVE te e te e e ape eae te ale te nente ae siente ae ice ек жок Же Аск Жок лелек ЖО 
E SPpTIING SYSTEM SUBROUTINES: 
EDISK MTI 4,208; READS å DISK FILE RECORD=128 BYTES 

STA LERM , PRELOAD LAST FRAME? FLAG 

LXI DRC SN 

MV I C ,READF 

CALL EDOS 

CPI ØØE, =NOT LAST FRAME 

RZ 

MV I A,Z1IE:=LAST FRAME 

STA LIRE 
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EXT 


SAR MEAS BE IE EE XZ E e ЖКК Oe BE AE AE AAS ON BE AE OE OS RR AE RE AS SK SE OK SR EE ЕЛЕ e E E e e e ACRE AE A OE 


MVI 
LXI 
CALL 
CPI 
JNZ 
LXI 
CALL 
RET 
LXI 
MVI 
OUT 
LXI 
CALL 
ШЕР 


WRDISK 


DWERR 


GREENE DIC AE IE SE E SIE DE Жее NS HE SHE AE TE OE SE OE IE KE SE TE SE OS ANE AE AE IE AE HE ETE AE BE ee Ge e gr e 


KREE Ka AS EA DISE FILE RECORD-12e8BYT=ES 
n, FCEOUT 

3D05 

Ogu 

DWERR 

D,WRMSG 

IRGLOUT 


Lee e 
А,09Ч, 
TEREG 
D,DWMSG 
TXTOUT 
EXIT, 


DISABLE BOARD INTZRRUPTS 


ESCAPE TO CPM 
Mog cox soe xe ton 


OPENDF MV I Deans OPENS DISK FILES 
STR ENG» 
LXI D.FCBIN 
MVI CROBFNEIL 
CALL EOS 
CPTI FFH; OPENING ERROR 
ANZ 
MV I RO LH 
STA FNO P 
RET 
7 MEME BR AE ME OE OS HEE HS BIE AE EE IE ЖОКЕ ЭК ЛЕЛЕ RE SE IE AE SK SE EIE IE DEE DE SE SEE I SK SKE SI ЖОЛОК XK TK > SE SK AK e e e Xç e re e 
DELEDF LXI H,RECFILs DELETES EXISTING DISK FILES 
MOV A,M 
INR As INCREMENT RECEIVED FILE NUMBER 
STA > CV 
STA RENE ”ይ፣ 
LXI DS CLOUT 
MYVI Coen sts 
CALL BDOS 
RET 
GARE NE DE DIE DE RE NE DIE SI DIE NE DIE RE NE DIE NE AE AE NE AE OE IE NE OE REE NE BK Oe RE TE AE KE E SK XE >< > EAS AE AE NE AE AS xx NE N z£ x< > >< >“ 
MAKEDF LXI D,FC38CUTs MAKES A NEA DISK FILE 
MVI EEE 
CALL 3DOS 
RET 
s FE XE SE E Де де ле Хе HEE SK BEE OK OE FEO CE EE AK EAE AE OE > SK S; ДЕЛЕ E NE NERE NOIR N NE RE AE OE ЭЕ ЛЕ ДЕСИ ДОКЕ АО > se >e X >e 
CLOSDP LXI EE EE, 
MVI G 6506555 
CALL 3 DS 
vm 
"sees e к Se dee e AE SS NS SK SI AS AE IS IS HE TR OK SIS KR RSS TK HE TIS AES SS ER ER OK ME AR AS ES ES TE OK OS ER AS OS 
RCYDMA LXI DNI Sido DIS: DMI FOr RECEIVE MODE 
MYI Gis MA 
CALL 2005 





PER 
o AEK AK E ee NIE NONE E E SI IE NE NONE DE NE NR RE e e dee e e e NE EE EE e ee es 


TRNDMA LXI ከ ከ ከመለሰ SETS DISK DMA ADDR FC? TRANSMIT 
MVI C,SDMA 
CALL BDOS 
RET 


° Xe € e e e ae e ee e pao aee e e ae ae e e ic e ae ЖКК e oes toe oleae sex e dee å te ite ak de RR E El 
ከን e e ሸሙ ee eh de der zie scott oe te fe as ote ote o ote oeste ente ele sic e tei le tote decke rente sio 
ሸሽ ። ካክ ስ 1 SUBROUTINES: 

PEAD-READS THE COMMAND STATUS REGISTER AFTER EACH COMMAND: 


READ MVI EE TE WEE 

MNI USO 
STLP IN ISREG 

ORA D 

o I OFFA: STATUS RSADY TO 35 RAAD? 

JNZ So 

IN SREG 

БПР С 

Jå STDON® 

JiM P ERF OR 
TRREAD MVI ERE LØR 
SELPI IN ISREG 

ORA E 

GPI ØFFE 

JNZ Sep 

IN SREG 

Gr I OOH 

JZ STDONE 

CPI ØLE 

JZ STDONE 
ERROR LXI D,EMSG 

CALL PXTOUT 


STDCNE RET 
ERC e e lc e BK OOK ee rk К де ЖК ЖК ЛЕ ЖОЖ АСКАК ЖоК ЖЖ ЖОЖ S NE XR ço e e ee ።፡፣።፡ ጁ Ж 


BEEN T-OUTPUTS TEXT STRPNGS TO THE CONSOLE: 
, 
TXTOUT MVI CPS LE ENG 


LL BDOS 

CALL SOL) 

ЗЕТ 
1 < 3 22 3 AE AEE AE AE SE EE BE OE OK OK OE IE NE NS DE DIE NE RENE NIE EAE HE AE EAE AE AS AE NE FEI SEAS OS ME AR XE See E E >z >£ 
; EOLN-GENERATES CARRIAGE RETURN + LINE FEED: 
ZOLN "VI C,CONSOUT 

MY I E ØDE 

GALL 32085 

«YI C, CONSCUT 

MVI ©, DAR 

OLI 820$ 

ET 





OO ORO 
NEL EUP-FILLS TEE TRANSMIT RUFTER MITE NULLS(20 REX): 


NULBUF MVI C,0080H5 CTR-128 
LXI H,TFDATA 
NULLOOP  MVI A,0€3 
MOV MP 
DCR C 
RZ 
INX R 
JMP NULLOOP 


O e oa ae ad ae ae к жож жож ote ste x o ote e ee e ie e lee te le se AE aaf e e ee de E HE KE R E SK NE N 
ee e e HE ee OR Mede He NE AE e e ee ee ee ee e ente e ee dee Ж e aee ae dee e NE E 
s STORAGE ALLOCATION: 


— 


FRAMIN DS 


1 5 FRAME ARRIVAL FLAG 

CEREG DS 15 COPY OF INTERRUPT ENABLE REG VALUE 
; NEEDED MESSAGES: 

TRMSG1 DB “ፍፍጆቻፍች PILE TRANSFER BEGINS Aktor” 
DMSS DB ee FILE TRANSFER COMPLETE =exexeacas ^ 
ERMSG DB “FILE NOT ON DISKS’ 

NORESMSG DB “ON RESPONSE FROM VAX-ZXITING TO CPMS’ 
LONGMSG DB “MAX CHARACTER LENGTH PFACHED-MSG SENTS’ 
TERRMSG DB “UNRECOVERARLE ERROR-EXITING TO CP/MS” 
TIMMSG 093 ”TIMED OUT-ABORTING TRANSMISSIONS* 

EMSG D3 ”NI3Ø1Ø COMMAND FAILEDS” 

MSG1 DB TXS” 

FERMSGØ DB “RECGEIVED BAD FRAMES” 

WRMSG DE MTA 

DWMSG DB “DISK WRITE ERROR-DISK FULLS’ 
COMMON/TXFCB/ 

FCBIN DS 36; TRANSMIT FILE CONTROL BLOCK 
COMMON/BXFCB/ 

FCROUT DS 36; RECEIVE FILE CONTROL BLOCK 
COMMON/TIBUFF/ 

TBUFFT DS 1 5 TPANSMIT BUFFER TOP-1ST DIST ADDBIT® 
DADDB DS E EE 

DADDC DS EE 

DADLD DS 1 5 FOURTH DEST ADCR BYTE 

DADDE DS LS Distal DESTebDDR BYTE 

DADDF DS 1; SISTI DEST ADDR PITE 

BUYP1 DS EIERE 

ПТҮР2 05 1 ፣ SECOND TYPE FIELD BYTE 

TFDATA Dë 15@@; DATA FIELD MAX SIZE 

COMMON/RX3UFF/ 

BHEUTTT DS 13; RECEIVE BUFFER TOP-FRAME CHECK EYTE 
SECADDD DS 1 5 P UOURPH SRCT ADIR BYT: 

SRCADDE DS 1 ; FIPTE SECE ADDR BYTE 

SRCADD? DS LO LAST cAc DOE BEDE 

BERYTT1 DS 1 RECYS RAME TYPE FLO BYTE 
RTYPE2 DS TSN TYPT FLD 2173 
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RDATAT DS 
CRCBYT DS 
COMMON/TXTBUF/ 
TXTTOP DS 
COMMON/FRSIZE/ 
FRSIZE DS 
COMMON/ACX/ 
ACK DS 
COMMON/TNOP/ 
FNOP DS 
COMMON/LFRM/ 
LFRM DS 
COMMON/TRMODE/ 
TRMODE DS 
COMMON/FILTYP/ 
AHLTYP DS 
COMMON/RECFIL/ 
RECFIL DS 
COMMON/VTERM/ 
VTERM DS 
END; 


le 
4 1 


E 5 
1 + 


Es 
ASSEMBLY 


HEG ID DITAMMLELD MAX SIZE 
CSC FISLD 


VAX TEXT TEMP BUFFER 
ACTUAL FRAME DATA BLOCK SIZE 
ACKNOWLEDGE FLAG LOCATION 
FILE NOT OPEN FLAG 
LAST FRAME FLAG 

VAX TRANSMIT FLAG 
LEE OEP LE TO SEND 
RECEIVED FILE NUMBER 


VIRGULE TERMINA ZES I NICENELAG 
DANGUAGE MODULE ETEERZ ASM 


; MEME AE IK >K ናች 5 ሩፍ IE AE AS SE ARE AE NE AE HE AK HE AS AH AS NE HK HE IRIE AE NS AK HO HE HEE X£ AE SAE A AE IK IK SLEE LE EL ELE EE 
å MEAT AT AS HAE BE EAE NE NE DE RR IA DE RENE NENNE 


DIR AS Bk AS HK AE DEAS AS HS AS HE AE AL AE AE 3S EE AS SK NE AE OK ASK c XK Xx >K >Z X Xx > Xk >< XZ 
1 > NS AS AS OE AR IE HE HE OE SRK AE ME AES EAE SIE BK EE I AE RESE e E e ee d 


ze AK AS ARS HE ORS NEAR OE AE E NEI NONE NERI NERA 
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APPENDIX L 


TEST PROGRAM USER INSTRUCTIONS 


The Ethernet hardware test programs, STHTESTA and 


ETHTESTE, are used ir the manner below: 


1. 
2: 


Invoke either program using normal CP/M-8@ procedures. 


Both programs first command the NIS212 to run it’s 
Wéé-tn diaenostic tests and report failures to the 
meer Via the console. The codes that ETETESTB will 
display as ASCII letters are encoded as noted at the 
end of the ETHTESTB.ASM source listing. 


Next, both programs ask the user to input a short line 
Text trat the programs use ia testing the intesrity 
of the essential lata paths of the NI3019. Program 
EE will as% the user for a second text line 
input because it performs one more test than ETHTSSTA. 
The Maximum number of characters per line is. ‚22 апа 
the line must be ended with a grave accent: 


The tests are successful if no error indications are 
displayed on the console and the text typed ir is 
shown on the corsol» exactly as it was entered after 
each data path input. 


EN 





NEE 


COMMUNICATION PROGRAM USER INSTRUCTIONS 


ME irstructions for use of the communication prozram 
ETRERNET.COM are as listed below: 


1. Invoke the program STHESNET using normal CP/M-39 
procedures. 


2. The program will then ask for the selection of: 
A. The disk drive number to write any received files 
20% 
B. The desired number of data bytes per Ethernet 
frame. 
Melee Network service desired. The choices are: 


1. Send messages or files. 

2. Receive messages or files. 

SEM virtual terminal service with the Wiki. 

E Command file transfers to or from the Veri. 
SRD) connect from the Network. 


Devendirz on which of the above services is requestei 
EN re user, the program will do the following: 


1. Serd a file or message: The program wili asx the user 
to ፣ሸ ን !ኛ which one Б depending on the response, 
wi ንቄ ን ንህ the followin 

. If message eh is selected, the program will: 

ds Ask the user to choose the network address of 
пе лез ла тол 

2. Then asgx the user to input thes message itself. 
The maximum message size is determined by the 
previously selected data blocx size. Tne last 
character entered in order to transmit must be 
a zrave accent character: À 

3. The message is then sent and upon < 
тсе о py (ho qesrisuarion post the 
restarts. 

IN е е л т лт 1s selected, the program will: 

Ro Aisne user il келу е is a text or machire 

code file. 

Ask the user to svecify which dis« the file is 

located cn. 

+ isz tre user the filename and Tiletyne of the 


ud 


N N 





file. 

4. Ask the user to specify the network address of 
Woocsgestyiration. 

ዐይ ጋብ ፡ል፡ጵጂጠጤጣጤሜ፡ማሜጫቹማመማምሙሮሎሙ፡፡ኮ፡ቄ፡-፡] transmission of the entire 
file the program will restart. 


Receive a file or message: The program will, upon 
selection of this mode, wait in a loop for any 
transmissions addressed to it to arrive. After the 
receipt of any file or message, the program will 
Hurn to the wait loop. This feature allows the 
user to leave the system unattended and then send 
multiple files and/or messages to it from another 
metwork host. The vorozram numbers files in the 
order they are received beginning with RECFROMZ.NET, 
ELS text filles received from the VAX must be run 
touezh the CP/M PIP utility as follows: 

PIP newfilname.filetype=RECFROM_.NFT[DEO] which will 
oor of urneeded characters. The user can exit tre 
wait loop to return to the above menus dy entering 

ea carriage return. 


minal service with the V4X 11/789: The program will 
ОШ рау a set of instructions to the user concerning 
the operation of the program in this mode. The user 
can input text after each Y-vromot ሸሽ.) appearance. 
Reri this mode, the user must enter a period (.) 
followed by a carriage return immediately followin= 
any V-prompt (75). Upon exiting this mode, the 
program returns to the beginning user menus. 


Command VAX file transfers: This mode allows the 
INTELLEC system to command the VAX to either send or 
receive files by sending it stecially coded messazes. 
The procedure is as follows: 
A. Downloadine VAX files: 
ME LE user mas: enter ine message: 
IVAX filename.VAXfiletype/TXT or EXE 
2. the soeeiried NX file will then be s 
the requesting urit. 
3. In the above message, TXT refers to text and 
“Ki refers to machine code files. 
. After the file receipt is completed, the 
puser can exit the wait 1009 by ertering a 
carraige return. 
EI uol oadinz VAX files: 
D raus user must enter the message ሽ 
'GVAX filename .VAX ei retype/Tir Grine 
or The above message opens a file by the above 
ene Ane VAR. The VAX 
dn reply: Ready for sendfile FN.FT and the 


` € 


ent to 


Wd 
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program will be in the receive wait loop. 

3. The user must then enter a carriage return to 
the beginrire of the prozram and then follow 
the normal file sending procedures as noted 
above. 


Disconnect from the network: Selection of this mode 
causes the program to return control to the C?/M-E2 
operating system. 


fue other features of this program are as follows: 


Error handling: The below listed transmission or 

reception errors will cause the program to display 

error messages and return to CP/M-82: 

A. Receipt of a bad frame. 

Boe seceipt of a frame that has an imoroperly encoded 
type field. 

G.  Acknowledge frame not received by the sending host 
in a given time frame (Source timed out). 

ER neceipt of a file larger than the disk space 
remaining (Disk full). 


Special instructions for IAPK 432 files that must be 
Exansferred from the TAX to an INTELLEC system running 
the Intel ISIS-II operating system: 

A. These special files can only be transferred using 
the VAX command mode. The VAX/VMS program 
ETEZERNET.EXZ must be invoked on the VAX in order 
mor tnis transfer to be successful. 

Bee tne procedure is as follows: 
etter downloading the file to the INTELLEC 

double density system using EZTHSANET.COM and 
CP/M-832, the user must rename it from the 
mame assigned to it by the receive program to 
dE cs ostelnal name: 

2. The user must put the CP/M-SC disk in drive A 
which must have stored on it both the renamed 
“ME ad the prozran PONS 15 GOM. 

“ke user must (Een Muinser:t an ISIS-II disk into 
drive B, 

4, The user then, while logged on drive 4, must 
invoke TOISIS filename.filetype. This will 
convert the preeram on A Lo tne ISIS-II 
format ard Store aIt or disk B. 

5. The user must then remove the CP/M-82 disk in 
ENN pe disk from 
drive 2. 

SS E Ds o reboot the INTELLEC 

system under the ISIS-Ii operating system 
and proceed with the ፲ጳ2፪ 432 procedures. 


O) 
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